home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-05-21 | 51.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar 9 12|
|00000040| 3a 35 32 3a 31 31 20 31 | 39 39 38 0a 3b 3b 3b 20 |:52:11 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 70 61 63 6b |s-20.3/l|isp/pack|
|000000a0| 61 67 65 73 2f 62 6f 6f | 6b 6d 61 72 6b 2e 65 6c |ages/boo|kmark.el|
|000000b0| 0a 3b 3b 3b 20 65 6d 61 | 63 73 20 76 65 72 73 69 |.;;; ema|cs versi|
|000000c0| 6f 6e 20 32 30 2e 34 20 | 22 45 6d 65 72 61 6c 64 |on 20.4 |"Emerald|
|000000d0| 22 20 58 45 6d 61 63 73 | 20 20 4c 75 63 69 64 2e |" XEmacs| Lucid.|
|000000e0| 0a 3b 3b 3b 20 62 79 74 | 65 63 6f 6d 70 20 76 65 |.;;; byt|ecomp ve|
|000000f0| 72 73 69 6f 6e 20 32 2e | 32 35 20 58 45 6d 61 63 |rsion 2.|25 XEmac|
|00000100| 73 3b 20 32 32 2d 4d 61 | 72 2d 39 36 2e 0a 3b 3b |s; 22-Ma|r-96..;;|
|00000110| 3b 20 6f 70 74 69 6d 69 | 7a 61 74 69 6f 6e 20 69 |; optimi|zation i|
|00000120| 73 20 6f 6e 2e 0a 3b 3b | 3b 20 74 68 69 73 20 66 |s on..;;|; this f|
|00000130| 69 6c 65 20 75 73 65 73 | 20 6f 70 63 6f 64 65 73 |ile uses| opcodes|
|00000140| 20 77 68 69 63 68 20 64 | 6f 20 6e 6f 74 20 65 78 | which d|o not ex|
|00000150| 69 73 74 20 69 6e 20 45 | 6d 61 63 73 20 31 39 2e |ist in E|macs 19.|
|00000160| 0a 0a 28 69 66 20 28 61 | 6e 64 20 28 62 6f 75 6e |..(if (a|nd (boun|
|00000170| 64 70 20 27 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |dp 'emac|s-versio|
|00000180| 6e 29 0a 09 20 28 6f 72 | 20 28 61 6e 64 20 28 62 |n).. (or| (and (b|
|00000190| 6f 75 6e 64 70 20 27 65 | 70 6f 63 68 3a 3a 76 65 |oundp 'e|poch::ve|
|000001a0| 72 73 69 6f 6e 29 20 65 | 70 6f 63 68 3a 3a 76 65 |rsion) e|poch::ve|
|000001b0| 72 73 69 6f 6e 29 0a 09 | 20 20 20 20 20 28 73 74 |rsion)..| (st|
|000001c0| 72 69 6e 67 2d 6c 65 73 | 73 70 20 65 6d 61 63 73 |ring-les|sp emacs|
|000001d0| 2d 76 65 72 73 69 6f 6e | 20 22 32 30 22 29 29 29 |-version| "20")))|
|000001e0| 0a 20 20 20 20 28 65 72 | 72 6f 72 20 22 60 62 6f |. (er|ror "`bo|
|000001f0| 6f 6b 6d 61 72 6b 2e 65 | 6c 27 20 77 61 73 20 63 |okmark.e|l' was c|
|00000200| 6f 6d 70 69 6c 65 64 20 | 66 6f 72 20 45 6d 61 63 |ompiled |for Emac|
|00000210| 73 20 32 30 22 29 29 0a | 0a 28 6f 72 20 28 62 6f |s 20")).|.(or (bo|
|00000220| 75 6e 64 70 20 27 63 75 | 72 72 65 6e 74 2d 6c 6f |undp 'cu|rrent-lo|
|00000230| 61 64 2d 6c 69 73 74 29 | 20 28 73 65 74 71 20 63 |ad-list)| (setq c|
|00000240| 75 72 72 65 6e 74 2d 6c | 6f 61 64 2d 6c 69 73 74 |urrent-l|oad-list|
|00000250| 20 6e 69 6c 29 29 0a 0a | 0a 28 72 65 71 75 69 72 | nil))..|.(requir|
|00000260| 65 20 27 70 70 29 0a 23 | 40 31 37 30 20 56 65 72 |e 'pp).#|@170 Ver|
|00000270| 73 69 6f 6e 20 6e 75 6d | 62 65 72 20 6f 66 20 62 |sion num|ber of b|
|00000280| 6f 6f 6b 6d 61 72 6b 2e | 65 6c 2e 20 20 54 68 69 |ookmark.|el. Thi|
|00000290| 73 20 69 73 20 6e 6f 74 | 20 72 65 6c 61 74 65 64 |s is not| related|
|000002a0| 20 74 6f 20 74 68 65 20 | 76 65 72 73 69 6f 6e 0a | to the |version.|
|000002b0| 6f 66 20 45 6d 61 63 73 | 20 62 6f 6f 6b 6d 61 72 |of Emacs| bookmar|
|000002c0| 6b 20 63 6f 6d 65 73 20 | 77 69 74 68 3b 20 69 74 |k comes |with; it|
|000002d0| 20 69 73 20 75 73 65 64 | 20 73 6f 6c 65 6c 79 20 | is used| solely |
|000002e0| 62 79 20 62 6f 6f 6b 6d | 61 72 6b 27 73 0a 6d 61 |by bookm|ark's.ma|
|000002f0| 69 6e 74 61 69 6e 65 72 | 73 20 74 6f 20 61 76 6f |intainer|s to avo|
|00000300| 69 64 20 76 65 72 73 69 | 6f 6e 20 63 6f 6e 66 75 |id versi|on confu|
|00000310| 73 69 6f 6e 2e 1f 0a 28 | 64 65 66 63 6f 6e 73 74 |sion...(|defconst|
|00000320| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 76 65 72 73 69 6f | bookmar|k-versio|
|00000330| 6e 20 22 32 2e 36 2e 34 | 22 20 28 23 24 20 2e 20 |n "2.6.4|" (#$ . |
|00000340| 36 32 31 29 29 0a 28 63 | 75 73 74 6f 6d 2d 64 65 |621)).(c|ustom-de|
|00000350| 63 6c 61 72 65 2d 67 72 | 6f 75 70 20 27 62 6f 6f |clare-gr|oup 'boo|
|00000360| 6b 6d 61 72 6b 73 20 6e | 69 6c 20 22 53 65 74 20 |kmarks n|il "Set |
|00000370| 62 6f 6f 6b 6d 61 72 6b | 73 2c 20 6d 61 79 62 65 |bookmark|s, maybe|
|00000380| 20 61 6e 6e 6f 74 61 74 | 65 20 74 68 65 6d 2c 20 | annotat|e them, |
|00000390| 6a 75 6d 70 20 74 6f 20 | 74 68 65 6d 20 6c 61 74 |jump to |them lat|
|000003a0| 65 72 2e 22 20 3a 70 72 | 65 66 69 78 20 22 62 6f |er." :pr|efix "bo|
|000003b0| 6f 6b 6d 61 72 6b 2d 22 | 20 3a 67 72 6f 75 70 20 |okmark-"| :group |
|000003c0| 27 65 64 69 74 69 6e 67 | 29 0a 28 63 75 73 74 6f |'editing|).(custo|
|000003d0| 6d 2d 64 65 63 6c 61 72 | 65 2d 76 61 72 69 61 62 |m-declar|e-variab|
|000003e0| 6c 65 20 27 62 6f 6f 6b | 6d 61 72 6b 2d 75 73 65 |le 'book|mark-use|
|000003f0| 2d 61 6e 6e 6f 74 61 74 | 69 6f 6e 73 20 27 6e 69 |-annotat|ions 'ni|
|00000400| 6c 20 22 2a 49 66 20 6e | 6f 6e 2d 6e 69 6c 2c 20 |l "*If n|on-nil, |
|00000410| 73 61 76 69 6e 67 20 61 | 20 62 6f 6f 6b 6d 61 72 |saving a| bookmar|
|00000420| 6b 20 77 69 6c 6c 20 71 | 75 65 72 79 20 66 6f 72 |k will q|uery for|
|00000430| 20 61 6e 20 61 6e 6e 6f | 74 61 74 69 6f 6e 20 69 | an anno|tation i|
|00000440| 6e 20 61 5c 6e 62 75 66 | 66 65 72 2e 22 20 3a 74 |n a\nbuf|fer." :t|
|00000450| 79 70 65 20 27 62 6f 6f | 6c 65 61 6e 20 3a 67 72 |ype 'boo|lean :gr|
|00000460| 6f 75 70 20 27 62 6f 6f | 6b 6d 61 72 6b 73 29 0a |oup 'boo|kmarks).|
|00000470| 28 63 75 73 74 6f 6d 2d | 64 65 63 6c 61 72 65 2d |(custom-|declare-|
|00000480| 76 61 72 69 61 62 6c 65 | 20 27 62 6f 6f 6b 6d 61 |variable| 'bookma|
|00000490| 72 6b 2d 73 61 76 65 2d | 66 6c 61 67 20 27 74 20 |rk-save-|flag 't |
|000004a0| 22 2a 43 6f 6e 74 72 6f | 6c 73 20 77 68 65 6e 20 |"*Contro|ls when |
|000004b0| 45 6d 61 63 73 20 73 61 | 76 65 73 20 62 6f 6f 6b |Emacs sa|ves book|
|000004c0| 6d 61 72 6b 73 20 74 6f | 20 61 20 66 69 6c 65 2e |marks to| a file.|
|000004d0| 5c 6e 2d 2d 3e 20 4e 69 | 6c 20 6d 65 61 6e 73 20 |\n--> Ni|l means |
|000004e0| 6e 65 76 65 72 20 73 61 | 76 65 20 62 6f 6f 6b 6d |never sa|ve bookm|
|000004f0| 61 72 6b 73 2c 20 65 78 | 63 65 70 74 20 77 68 65 |arks, ex|cept whe|
|00000500| 6e 20 60 62 6f 6f 6b 6d | 61 72 6b 2d 73 61 76 65 |n `bookm|ark-save|
|00000510| 27 20 69 73 5c 6e 20 20 | 20 20 65 78 70 6c 69 63 |' is\n | explic|
|00000520| 69 74 6c 79 20 63 61 6c | 6c 65 64 20 28 5c 5c 5b |itly cal|led (\\[|
|00000530| 62 6f 6f 6b 6d 61 72 6b | 2d 73 61 76 65 5d 29 2e |bookmark|-save]).|
|00000540| 5c 6e 2d 2d 3e 20 74 20 | 6d 65 61 6e 73 20 73 61 |\n--> t |means sa|
|00000550| 76 65 20 62 6f 6f 6b 6d | 61 72 6b 73 20 77 68 65 |ve bookm|arks whe|
|00000560| 6e 20 45 6d 61 63 73 20 | 69 73 20 6b 69 6c 6c 65 |n Emacs |is kille|
|00000570| 64 2e 5c 6e 2d 2d 3e 20 | 4f 74 68 65 72 77 69 73 |d.\n--> |Otherwis|
|00000580| 65 2c 20 69 74 20 73 68 | 6f 75 6c 64 20 62 65 20 |e, it sh|ould be |
|00000590| 61 20 6e 75 6d 62 65 72 | 20 74 68 61 74 20 69 73 |a number| that is|
|000005a0| 20 74 68 65 20 66 72 65 | 71 75 65 6e 63 79 20 77 | the fre|quency w|
|000005b0| 69 74 68 20 77 68 69 63 | 68 5c 6e 20 20 20 20 74 |ith whic|h\n t|
|000005c0| 68 65 20 62 6f 6f 6b 6d | 61 72 6b 20 6c 69 73 74 |he bookm|ark list|
|000005d0| 20 69 73 20 73 61 76 65 | 64 20 28 69 2e 65 2e 3a | is save|d (i.e.:|
|000005e0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 74 | the num|ber of t|
|000005f0| 69 6d 65 73 20 77 68 69 | 63 68 5c 6e 20 20 20 20 |imes whi|ch\n |
|00000600| 45 6d 61 63 73 27 20 62 | 6f 6f 6b 6d 61 72 6b 20 |Emacs' b|ookmark |
|00000610| 6c 69 73 74 20 6d 61 79 | 20 62 65 20 6d 6f 64 69 |list may| be modi|
|00000620| 66 69 65 64 20 62 65 66 | 6f 72 65 20 69 74 20 69 |fied bef|ore it i|
|00000630| 73 20 61 75 74 6f 6d 61 | 74 69 63 61 6c 6c 79 5c |s automa|tically\|
|00000640| 6e 20 20 20 20 73 61 76 | 65 64 2e 29 2e 20 20 49 |n sav|ed.). I|
|00000650| 66 20 69 74 20 69 73 20 | 61 20 6e 75 6d 62 65 72 |f it is |a number|
|00000660| 2c 20 45 6d 61 63 73 20 | 77 69 6c 6c 20 61 6c 73 |, Emacs |will als|
|00000670| 6f 20 61 75 74 6f 6d 61 | 74 69 63 61 6c 6c 79 20 |o automa|tically |
|00000680| 73 61 76 65 5c 6e 20 20 | 20 20 62 6f 6f 6b 6d 61 |save\n | bookma|
|00000690| 72 6b 73 20 77 68 65 6e | 20 69 74 20 69 73 20 6b |rks when| it is k|
|000006a0| 69 6c 6c 65 64 2e 5c 6e | 5c 6e 54 68 65 72 65 66 |illed.\n|\nTheref|
|000006b0| 6f 72 65 2c 20 74 68 65 | 20 77 61 79 20 74 6f 20 |ore, the| way to |
|000006c0| 67 65 74 20 69 74 20 74 | 6f 20 73 61 76 65 20 65 |get it t|o save e|
|000006d0| 76 65 72 79 20 74 69 6d | 65 20 79 6f 75 20 6d 61 |very tim|e you ma|
|000006e0| 6b 65 20 6f 72 20 64 65 | 6c 65 74 65 20 61 5c 6e |ke or de|lete a\n|
|000006f0| 62 6f 6f 6b 6d 61 72 6b | 20 69 73 20 74 6f 20 73 |bookmark| is to s|
|00000700| 65 74 20 74 68 69 73 20 | 76 61 72 69 61 62 6c 65 |et this |variable|
|00000710| 20 74 6f 20 31 20 28 6f | 72 20 30 2c 20 77 68 69 | to 1 (o|r 0, whi|
|00000720| 63 68 20 70 72 6f 64 75 | 63 65 73 20 74 68 65 20 |ch produ|ces the |
|00000730| 73 61 6d 65 5c 6e 62 65 | 68 61 76 69 6f 72 2e 29 |same\nbe|havior.)|
|00000740| 5c 6e 5c 6e 54 6f 20 73 | 70 65 63 69 66 79 20 74 |\n\nTo s|pecify t|
|00000750| 68 65 20 66 69 6c 65 20 | 69 6e 20 77 68 69 63 68 |he file |in which|
|00000760| 20 74 6f 20 73 61 76 65 | 20 74 68 65 6d 2c 20 6d | to save| them, m|
|00000770| 6f 64 69 66 79 20 74 68 | 65 20 76 61 72 69 61 62 |odify th|e variab|
|00000780| 6c 65 5c 6e 62 6f 6f 6b | 6d 61 72 6b 2d 64 65 66 |le\nbook|mark-def|
|00000790| 61 75 6c 74 2d 66 69 6c | 65 2c 20 77 68 69 63 68 |ault-fil|e, which|
|000007a0| 20 69 73 20 60 7e 2f 2e | 65 6d 61 63 73 2e 62 6d | is `~/.|emacs.bm|
|000007b0| 6b 27 20 62 79 20 64 65 | 66 61 75 6c 74 2e 22 20 |k' by de|fault." |
|000007c0| 3a 74 79 70 65 20 27 28 | 63 68 6f 69 63 65 20 28 |:type '(|choice (|
|000007d0| 63 6f 6e 73 74 20 3a 74 | 61 67 20 22 4e 65 76 65 |const :t|ag "Neve|
|000007e0| 72 22 20 6e 69 6c 29 20 | 28 63 6f 6e 73 74 20 3a |r" nil) |(const :|
|000007f0| 74 61 67 20 22 4f 6e 20 | 45 78 69 74 22 20 74 29 |tag "On |Exit" t)|
|00000800| 20 28 6e 75 6d 62 65 72 | 20 3a 74 61 67 20 22 46 | (number| :tag "F|
|00000810| 72 65 71 75 65 6e 63 79 | 22 20 31 29 29 20 3a 67 |requency|" 1)) :g|
|00000820| 72 6f 75 70 20 27 62 6f | 6f 6b 6d 61 72 6b 73 29 |roup 'bo|okmarks)|
|00000830| 0a 23 40 34 36 20 2a 54 | 68 65 20 2e 65 6d 61 63 |.#@46 *T|he .emac|
|00000840| 73 2e 62 6d 6b 20 66 69 | 6c 65 20 75 73 65 64 20 |s.bmk fi|le used |
|00000850| 74 6f 20 62 65 20 63 61 | 6c 6c 65 64 20 74 68 69 |to be ca|lled thi|
|00000860| 73 2e 1f 0a 28 64 65 66 | 63 6f 6e 73 74 20 62 6f |s...(def|const bo|
|00000870| 6f 6b 6d 61 72 6b 2d 6f | 6c 64 2d 64 65 66 61 75 |okmark-o|ld-defau|
|00000880| 6c 74 2d 66 69 6c 65 20 | 22 7e 2f 2e 65 6d 61 63 |lt-file |"~/.emac|
|00000890| 73 2d 62 6b 6d 72 6b 73 | 22 20 28 23 24 20 2e 20 |s-bkmrks|" (#$ . |
|000008a0| 2d 32 31 30 32 29 29 0a | 23 40 33 39 20 4f 6c 64 |-2102)).|#@39 Old|
|000008b0| 20 6e 61 6d 65 20 66 6f | 72 20 60 62 6f 6f 6b 6d | name fo|r `bookm|
|000008c0| 61 72 6b 2d 64 65 66 61 | 75 6c 74 2d 66 69 6c 65 |ark-defa|ult-file|
|000008d0| 27 2e 1f 0a 28 64 65 66 | 76 61 72 20 62 6f 6f 6b |'...(def|var book|
|000008e0| 6d 61 72 6b 2d 66 69 6c | 65 20 6e 69 6c 20 28 23 |mark-fil|e nil (#|
|000008f0| 24 20 2e 20 32 32 32 31 | 29 29 0a 23 40 34 36 20 |$ . 2221|)).#@46 |
|00000900| 2a 46 69 6c 65 20 69 6e | 20 77 68 69 63 68 20 74 |*File in| which t|
|00000910| 6f 20 73 61 76 65 20 62 | 6f 6f 6b 6d 61 72 6b 73 |o save b|ookmarks|
|00000920| 20 62 79 20 64 65 66 61 | 75 6c 74 2e 1f 0a 28 64 | by defa|ult...(d|
|00000930| 65 66 76 61 72 20 62 6f | 6f 6b 6d 61 72 6b 2d 64 |efvar bo|okmark-d|
|00000940| 65 66 61 75 6c 74 2d 66 | 69 6c 65 20 28 62 79 74 |efault-f|ile (byt|
|00000950| 65 2d 63 6f 64 65 20 22 | 08 ab 82 08 87 c1 c2 21 |e-code "|.......!|
|00000960| 87 22 20 5b 62 6f 6f 6b | 6d 61 72 6b 2d 66 69 6c |." [book|mark-fil|
|00000970| 65 20 63 6f 6e 76 65 72 | 74 2d 73 74 61 6e 64 61 |e conver|t-standa|
|00000980| 72 64 2d 66 69 6c 65 6e | 61 6d 65 20 22 7e 2f 2e |rd-filen|ame "~/.|
|00000990| 65 6d 61 63 73 2e 62 6d | 6b 22 5d 20 32 29 20 28 |emacs.bm|k"] 2) (|
|000009a0| 23 24 20 2e 20 2d 32 33 | 30 34 29 29 0a 28 63 75 |#$ . -23|04)).(cu|
|000009b0| 73 74 6f 6d 2d 64 65 63 | 6c 61 72 65 2d 76 61 72 |stom-dec|lare-var|
|000009c0| 69 61 62 6c 65 20 27 62 | 6f 6f 6b 6d 61 72 6b 2d |iable 'b|ookmark-|
|000009d0| 76 65 72 73 69 6f 6e 2d | 63 6f 6e 74 72 6f 6c 20 |version-|control |
|000009e0| 27 27 6e 6f 73 70 65 63 | 69 61 6c 20 22 2a 57 68 |''nospec|ial "*Wh|
|000009f0| 65 74 68 65 72 20 6f 72 | 20 6e 6f 74 20 74 6f 20 |ether or| not to |
|00000a00| 6d 61 6b 65 20 6e 75 6d | 62 65 72 65 64 20 62 61 |make num|bered ba|
|00000a10| 63 6b 75 70 73 20 6f 66 | 20 74 68 65 20 62 6f 6f |ckups of| the boo|
|00000a20| 6b 6d 61 72 6b 20 66 69 | 6c 65 2e 5c 6e 49 74 20 |kmark fi|le.\nIt |
|00000a30| 63 61 6e 20 68 61 76 65 | 20 66 6f 75 72 20 76 61 |can have| four va|
|00000a40| 6c 75 65 73 3a 20 74 2c | 20 6e 69 6c 2c 20 60 6e |lues: t,| nil, `n|
|00000a50| 65 76 65 72 27 2c 20 61 | 6e 64 20 60 6e 6f 73 70 |ever', a|nd `nosp|
|00000a60| 65 63 69 61 6c 27 2e 5c | 6e 54 68 65 20 66 69 72 |ecial'.\|nThe fir|
|00000a70| 73 74 20 74 68 72 65 65 | 20 68 61 76 65 20 74 68 |st three| have th|
|00000a80| 65 20 73 61 6d 65 20 6d | 65 61 6e 69 6e 67 20 74 |e same m|eaning t|
|00000a90| 68 61 74 20 74 68 65 79 | 20 64 6f 20 66 6f 72 20 |hat they| do for |
|00000aa0| 74 68 65 5c 6e 76 61 72 | 69 61 62 6c 65 20 60 76 |the\nvar|iable `v|
|00000ab0| 65 72 73 69 6f 6e 2d 63 | 6f 6e 74 72 6f 6c 27 2c |ersion-c|ontrol',|
|00000ac0| 20 61 6e 64 20 74 68 65 | 20 66 69 6e 61 6c 20 76 | and the| final v|
|00000ad0| 61 6c 75 65 20 60 6e 6f | 73 70 65 63 69 61 6c 27 |alue `no|special'|
|00000ae0| 20 6d 65 61 6e 73 20 6a | 75 73 74 5c 6e 75 73 65 | means j|ust\nuse|
|00000af0| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 60 76 | the val|ue of `v|
|00000b00| 65 72 73 69 6f 6e 2d 63 | 6f 6e 74 72 6f 6c 27 2e |ersion-c|ontrol'.|
|00000b10| 22 20 3a 74 79 70 65 20 | 27 28 63 68 6f 69 63 65 |" :type |'(choice|
|00000b20| 20 28 63 6f 6e 73 74 20 | 74 29 20 28 63 6f 6e 73 | (const |t) (cons|
|00000b30| 74 20 6e 69 6c 29 20 28 | 63 6f 6e 73 74 20 6e 65 |t nil) (|const ne|
|00000b40| 76 65 72 29 20 28 63 6f | 6e 73 74 20 6e 6f 73 70 |ver) (co|nst nosp|
|00000b50| 65 63 69 61 6c 29 29 20 | 3a 67 72 6f 75 70 20 27 |ecial)) |:group '|
|00000b60| 62 6f 6f 6b 6d 61 72 6b | 73 29 0a 28 63 75 73 74 |bookmark|s).(cust|
|00000b70| 6f 6d 2d 64 65 63 6c 61 | 72 65 2d 76 61 72 69 61 |om-decla|re-varia|
|00000b80| 62 6c 65 20 27 62 6f 6f | 6b 6d 61 72 6b 2d 63 6f |ble 'boo|kmark-co|
|00000b90| 6d 70 6c 65 74 69 6f 6e | 2d 69 67 6e 6f 72 65 2d |mpletion|-ignore-|
|00000ba0| 63 61 73 65 20 27 74 20 | 22 2a 4e 6f 6e 2d 6e 69 |case 't |"*Non-ni|
|00000bb0| 6c 20 6d 65 61 6e 73 20 | 62 6f 6f 6b 6d 61 72 6b |l means |bookmark|
|00000bc0| 20 66 75 6e 63 74 69 6f | 6e 73 20 69 67 6e 6f 72 | functio|ns ignor|
|00000bd0| 65 20 63 61 73 65 20 69 | 6e 20 63 6f 6d 70 6c 65 |e case i|n comple|
|00000be0| 74 69 6f 6e 2e 22 20 3a | 74 79 70 65 20 27 62 6f |tion." :|type 'bo|
|00000bf0| 6f 6c 65 61 6e 20 3a 67 | 72 6f 75 70 20 27 62 6f |olean :g|roup 'bo|
|00000c00| 6f 6b 6d 61 72 6b 73 29 | 0a 28 63 75 73 74 6f 6d |okmarks)|.(custom|
|00000c10| 2d 64 65 63 6c 61 72 65 | 2d 76 61 72 69 61 62 6c |-declare|-variabl|
|00000c20| 65 20 27 62 6f 6f 6b 6d | 61 72 6b 2d 73 6f 72 74 |e 'bookm|ark-sort|
|00000c30| 2d 66 6c 61 67 20 27 74 | 20 22 2a 4e 6f 6e 2d 6e |-flag 't| "*Non-n|
|00000c40| 69 6c 20 6d 65 61 6e 73 | 20 74 68 61 74 20 62 6f |il means| that bo|
|00000c50| 6f 6b 6d 61 72 6b 73 20 | 77 69 6c 6c 20 62 65 20 |okmarks |will be |
|00000c60| 64 69 73 70 6c 61 79 65 | 64 20 73 6f 72 74 65 64 |displaye|d sorted|
|00000c70| 20 62 79 20 62 6f 6f 6b | 6d 61 72 6b 5c 6e 6e 61 | by book|mark\nna|
|00000c80| 6d 65 2e 20 20 4f 74 68 | 65 72 77 69 73 65 20 74 |me. Oth|erwise t|
|00000c90| 68 65 79 20 77 69 6c 6c | 20 62 65 20 64 69 73 70 |hey will| be disp|
|00000ca0| 6c 61 79 65 64 20 69 6e | 20 4c 49 46 4f 20 6f 72 |layed in| LIFO or|
|00000cb0| 64 65 72 20 28 74 68 61 | 74 20 69 73 2c 20 6d 6f |der (tha|t is, mo|
|00000cc0| 73 74 5c 6e 72 65 63 65 | 6e 74 6c 79 20 73 65 74 |st\nrece|ntly set|
|00000cd0| 20 6f 6e 65 73 20 63 6f | 6d 65 20 66 69 72 73 74 | ones co|me first|
|00000ce0| 2c 20 6f 6c 64 65 73 74 | 20 6f 6e 65 73 20 63 6f |, oldest| ones co|
|00000cf0| 6d 65 20 6c 61 73 74 29 | 2e 22 20 3a 74 79 70 65 |me last)|." :type|
|00000d00| 20 27 62 6f 6f 6c 65 61 | 6e 20 3a 67 72 6f 75 70 | 'boolea|n :group|
|00000d10| 20 27 62 6f 6f 6b 6d 61 | 72 6b 73 29 0a 28 63 75 | 'bookma|rks).(cu|
|00000d20| 73 74 6f 6d 2d 64 65 63 | 6c 61 72 65 2d 76 61 72 |stom-dec|lare-var|
|00000d30| 69 61 62 6c 65 20 27 62 | 6f 6f 6b 6d 61 72 6b 2d |iable 'b|ookmark-|
|00000d40| 61 75 74 6f 6d 61 74 69 | 63 61 6c 6c 79 2d 73 68 |automati|cally-sh|
|00000d50| 6f 77 2d 61 6e 6e 6f 74 | 61 74 69 6f 6e 73 20 27 |ow-annot|ations '|
|00000d60| 74 20 22 2a 4e 69 6c 20 | 6d 65 61 6e 73 20 64 6f |t "*Nil |means do|
|00000d70| 6e 27 74 20 73 68 6f 77 | 20 61 6e 6e 6f 74 61 74 |n't show| annotat|
|00000d80| 69 6f 6e 73 20 77 68 65 | 6e 20 6a 75 6d 70 69 6e |ions whe|n jumpin|
|00000d90| 67 20 74 6f 20 61 20 62 | 6f 6f 6b 6d 61 72 6b 2e |g to a b|ookmark.|
|00000da0| 22 20 3a 74 79 70 65 20 | 27 62 6f 6f 6c 65 61 6e |" :type |'boolean|
|00000db0| 20 3a 67 72 6f 75 70 20 | 27 62 6f 6f 6b 6d 61 72 | :group |'bookmar|
|00000dc0| 6b 73 29 0a 28 63 75 73 | 74 6f 6d 2d 64 65 63 6c |ks).(cus|tom-decl|
|00000dd0| 61 72 65 2d 76 61 72 69 | 61 62 6c 65 20 27 62 6f |are-vari|able 'bo|
|00000de0| 6f 6b 6d 61 72 6b 2d 62 | 6d 65 6e 75 2d 66 69 6c |okmark-b|menu-fil|
|00000df0| 65 2d 63 6f 6c 75 6d 6e | 20 27 33 30 20 22 2a 43 |e-column| '30 "*C|
|00000e00| 6f 6c 75 6d 6e 20 61 74 | 20 77 68 69 63 68 20 74 |olumn at| which t|
|00000e10| 6f 20 64 69 73 70 6c 61 | 79 20 66 69 6c 65 6e 61 |o displa|y filena|
|00000e20| 6d 65 73 20 69 6e 20 61 | 20 62 75 66 66 65 72 20 |mes in a| buffer |
|00000e30| 6c 69 73 74 69 6e 67 20 | 62 6f 6f 6b 6d 61 72 6b |listing |bookmark|
|00000e40| 73 2e 5c 6e 59 6f 75 20 | 63 61 6e 20 74 6f 67 67 |s.\nYou |can togg|
|00000e50| 6c 65 20 77 68 65 74 68 | 65 72 20 66 69 6c 65 73 |le wheth|er files|
|00000e60| 20 61 72 65 20 73 68 6f | 77 6e 20 77 69 74 68 20 | are sho|wn with |
|00000e70| 5c 5c 3c 62 6f 6f 6b 6d | 61 72 6b 2d 62 6d 65 6e |\\<bookm|ark-bmen|
|00000e80| 75 2d 6d 6f 64 65 2d 6d | 61 70 3e 5c 5c 5b 62 6f |u-mode-m|ap>\\[bo|
|00000e90| 6f 6b 6d 61 72 6b 2d 62 | 6d 65 6e 75 2d 74 6f 67 |okmark-b|menu-tog|
|00000ea0| 67 6c 65 2d 66 69 6c 65 | 6e 61 6d 65 73 5d 2e 22 |gle-file|names]."|
|00000eb0| 20 3a 74 79 70 65 20 27 | 69 6e 74 65 67 65 72 20 | :type '|integer |
|00000ec0| 3a 67 72 6f 75 70 20 27 | 62 6f 6f 6b 6d 61 72 6b |:group '|bookmark|
|00000ed0| 73 29 0a 28 63 75 73 74 | 6f 6d 2d 64 65 63 6c 61 |s).(cust|om-decla|
|00000ee0| 72 65 2d 76 61 72 69 61 | 62 6c 65 20 27 62 6f 6f |re-varia|ble 'boo|
|00000ef0| 6b 6d 61 72 6b 2d 62 6d | 65 6e 75 2d 74 6f 67 67 |kmark-bm|enu-togg|
|00000f00| 6c 65 2d 66 69 6c 65 6e | 61 6d 65 73 20 27 74 20 |le-filen|ames 't |
|00000f10| 22 2a 4e 6f 6e 2d 6e 69 | 6c 20 6d 65 61 6e 73 20 |"*Non-ni|l means |
|00000f20| 73 68 6f 77 20 66 69 6c | 65 6e 61 6d 65 73 20 77 |show fil|enames w|
|00000f30| 68 65 6e 20 6c 69 73 74 | 69 6e 67 20 62 6f 6f 6b |hen list|ing book|
|00000f40| 6d 61 72 6b 73 2e 5c 6e | 54 68 69 73 20 6d 61 79 |marks.\n|This may|
|00000f50| 20 72 65 73 75 6c 74 20 | 69 6e 20 74 72 75 6e 63 | result |in trunc|
|00000f60| 61 74 65 64 20 62 6f 6f | 6b 6d 61 72 6b 20 6e 61 |ated boo|kmark na|
|00000f70| 6d 65 73 2e 20 20 54 6f | 20 64 69 73 61 62 6c 65 |mes. To| disable|
|00000f80| 20 74 68 69 73 2c 20 70 | 75 74 20 74 68 65 5c 6e | this, p|ut the\n|
|00000f90| 66 6f 6c 6c 6f 77 69 6e | 67 20 69 6e 20 79 6f 75 |followin|g in you|
|00000fa0| 72 20 2e 65 6d 61 63 73 | 3a 5c 6e 5c 6e 28 73 65 |r .emacs|:\n\n(se|
|00000fb0| 74 71 20 62 6f 6f 6b 6d | 61 72 6b 2d 62 6d 65 6e |tq bookm|ark-bmen|
|00000fc0| 75 2d 74 6f 67 67 6c 65 | 2d 66 69 6c 65 6e 61 6d |u-toggle|-filenam|
|00000fd0| 65 73 20 6e 69 6c 29 22 | 20 3a 74 79 70 65 20 27 |es nil)"| :type '|
|00000fe0| 62 6f 6f 6c 65 61 6e 20 | 3a 67 72 6f 75 70 20 27 |boolean |:group '|
|00000ff0| 62 6f 6f 6b 6d 61 72 6b | 73 29 0a 28 63 75 73 74 |bookmark|s).(cust|
|00001000| 6f 6d 2d 64 65 63 6c 61 | 72 65 2d 76 61 72 69 61 |om-decla|re-varia|
|00001010| 62 6c 65 20 27 62 6f 6f | 6b 6d 61 72 6b 2d 6d 65 |ble 'boo|kmark-me|
|00001020| 6e 75 2d 6c 65 6e 67 74 | 68 20 27 37 30 20 22 2a |nu-lengt|h '70 "*|
|00001030| 4d 61 78 69 6d 75 6d 20 | 6c 65 6e 67 74 68 20 6f |Maximum |length o|
|00001040| 66 20 61 20 62 6f 6f 6b | 6d 61 72 6b 20 6e 61 6d |f a book|mark nam|
|00001050| 65 20 64 69 73 70 6c 61 | 79 65 64 20 6f 6e 20 61 |e displa|yed on a|
|00001060| 20 70 6f 70 75 70 20 6d | 65 6e 75 2e 22 20 3a 74 | popup m|enu." :t|
|00001070| 79 70 65 20 27 69 6e 74 | 65 67 65 72 20 3a 67 72 |ype 'int|eger :gr|
|00001080| 6f 75 70 20 27 62 6f 6f | 6b 6d 61 72 6b 73 29 0a |oup 'boo|kmarks).|
|00001090| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 5c 6e |(byte-co|de "..\n|
|000010a0| 5c 22 13 c3 0c 42 14 c5 | c6 21 ac 84 c6 c7 4d 88 |\"...B..|.!....M.|
|000010b0| c5 c8 21 ac 85 c6 c8 c9 | 5c 22 88 ca cb 21 ac 83 |..!.....|\"...!..|
|000010c0| cc 16 0b c5 cd 21 ac 8f | c5 ce 21 ab 86 cd ce 4d |.....!..|..!....M|
|000010d0| 88 aa 84 cd cf 4d 88 d0 | d1 21 39 ac 95 d2 0e 13 |.....M..|.!9.....|
|000010e0| d4 d5 23 88 d2 0e 13 d6 | d7 23 88 d2 0e 13 d8 d9 |..#.....|.#......|
|000010f0| 23 88 c0 87 22 20 5b 73 | 74 72 69 6e 67 2d 6d 61 |#..." [s|tring-ma|
|00001100| 74 63 68 20 22 5c 5c 28 | 4c 75 63 69 64 5c 5c 7c |tch "\\(|Lucid\\||
|00001110| 58 45 6d 61 63 73 5c 5c | 29 22 20 65 6d 61 63 73 |XEmacs\\|)" emacs|
|00001120| 2d 76 65 72 73 69 6f 6e | 20 62 6f 6f 6b 6d 61 72 |-version| bookmar|
|00001130| 6b 2d 78 65 6d 61 63 73 | 70 20 63 75 72 72 65 6e |k-xemacs|p curren|
|00001140| 74 2d 6c 6f 61 64 2d 6c | 69 73 74 20 66 62 6f 75 |t-load-l|ist fbou|
|00001150| 6e 64 70 20 64 65 66 61 | 6c 69 61 73 20 66 73 65 |ndp defa|lias fse|
|00001160| 74 20 66 72 61 6d 65 2d | 68 65 69 67 68 74 20 73 |t frame-|height s|
|00001170| 63 72 65 65 6e 2d 68 65 | 69 67 68 74 20 62 6f 75 |creen-he|ight bou|
|00001180| 6e 64 70 20 62 61 75 64 | 2d 72 61 74 65 20 31 39 |ndp baud|-rate 19|
|00001190| 32 30 30 20 62 75 66 66 | 65 72 2d 73 75 62 73 74 |200 buff|er-subst|
|000011a0| 72 69 6e 67 2d 6e 6f 2d | 70 72 6f 70 65 72 74 69 |ring-no-|properti|
|000011b0| 65 73 20 62 75 66 66 65 | 72 2d 73 75 62 73 74 72 |es buffe|r-substr|
|000011c0| 69 6e 67 2d 77 69 74 68 | 6f 75 74 2d 70 72 6f 70 |ing-with|out-prop|
|000011d0| 65 72 74 69 65 73 20 62 | 75 66 66 65 72 2d 73 75 |erties b|uffer-su|
|000011e0| 62 73 74 72 69 6e 67 20 | 6b 65 79 2d 62 69 6e 64 |bstring |key-bind|
|000011f0| 69 6e 67 20 22 18 72 22 | 20 64 65 66 69 6e 65 2d |ing ".r"| define-|
|00001200| 6b 65 79 20 63 74 6c 2d | 78 2d 6d 61 70 20 22 72 |key ctl-|x-map "r|
|00001210| 62 22 20 62 6f 6f 6b 6d | 61 72 6b 2d 6a 75 6d 70 |b" bookm|ark-jump|
|00001220| 20 22 72 6d 22 20 62 6f | 6f 6b 6d 61 72 6b 2d 73 | "rm" bo|okmark-s|
|00001230| 65 74 20 22 72 6c 22 20 | 62 6f 6f 6b 6d 61 72 6b |et "rl" |bookmark|
|00001240| 2d 62 6d 65 6e 75 2d 6c | 69 73 74 5d 20 34 29 0a |-bmenu-l|ist] 4).|
|00001250| 23 40 32 37 39 20 4b 65 | 79 6d 61 70 20 63 6f 6e |#@279 Ke|ymap con|
|00001260| 74 61 69 6e 69 6e 67 20 | 62 69 6e 64 69 6e 67 73 |taining |bindings|
|00001270| 20 74 6f 20 62 6f 6f 6b | 6d 61 72 6b 20 66 75 6e | to book|mark fun|
|00001280| 63 74 69 6f 6e 73 2e 0a | 49 74 20 69 73 20 6e 6f |ctions..|It is no|
|00001290| 74 20 62 6f 75 6e 64 20 | 74 6f 20 61 6e 79 20 6b |t bound |to any k|
|000012a0| 65 79 20 62 79 20 64 65 | 66 61 75 6c 74 3a 20 74 |ey by de|fault: t|
|000012b0| 6f 20 62 69 6e 64 20 69 | 74 0a 73 6f 20 74 68 61 |o bind i|t.so tha|
|000012c0| 74 20 79 6f 75 20 68 61 | 76 65 20 61 20 62 6f 6f |t you ha|ve a boo|
|000012d0| 6b 6d 61 72 6b 20 70 72 | 65 66 69 78 2c 20 6a 75 |kmark pr|efix, ju|
|000012e0| 73 74 20 75 73 65 20 60 | 67 6c 6f 62 61 6c 2d 73 |st use `|global-s|
|000012f0| 65 74 2d 6b 65 79 27 20 | 61 6e 64 20 62 69 6e 64 |et-key' |and bind|
|00001300| 20 61 0a 6b 65 79 20 6f | 66 20 79 6f 75 72 20 63 | a.key o|f your c|
|00001310| 68 6f 69 63 65 20 74 6f | 20 60 62 6f 6f 6b 6d 61 |hoice to| `bookma|
|00001320| 72 6b 2d 6d 61 70 27 2e | 20 20 41 6c 6c 20 69 6e |rk-map'.| All in|
|00001330| 74 65 72 61 63 74 69 76 | 65 20 62 6f 6f 6b 6d 61 |teractiv|e bookma|
|00001340| 72 6b 0a 66 75 6e 63 74 | 69 6f 6e 73 20 68 61 76 |rk.funct|ions hav|
|00001350| 65 20 61 20 62 69 6e 64 | 69 6e 67 20 69 6e 20 74 |e a bind|ing in t|
|00001360| 68 69 73 20 6b 65 79 6d | 61 70 2e 1f 0a 28 64 65 |his keym|ap...(de|
|00001370| 66 76 61 72 20 62 6f 6f | 6b 6d 61 72 6b 2d 6d 61 |fvar boo|kmark-ma|
|00001380| 70 20 6e 69 6c 20 28 23 | 24 20 2e 20 34 36 39 34 |p nil (#|$ . 4694|
|00001390| 29 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |)).(byte|-code ".|
|000013a0| c1 21 88 c2 09 c3 c4 23 | 88 c2 09 c5 c4 23 88 c2 |.!.....#|.....#..|
|000013b0| 09 c6 c7 23 88 c2 09 c8 | c7 23 88 c2 09 c9 ca 23 |...#....|.#.....#|
|000013c0| 88 c2 09 cb cc 23 88 c2 | 09 cd ce 23 88 c2 09 cf |.....#..|...#....|
|000013d0| d0 23 88 c2 09 d1 d2 23 | 88 c2 09 d3 d4 23 88 c2 |.#.....#|.....#..|
|000013e0| 09 d5 d6 23 88 c2 09 d7 | d8 23 87 22 20 5b 64 65 |...#....|.#." [de|
|000013f0| 66 69 6e 65 2d 70 72 65 | 66 69 78 2d 63 6f 6d 6d |fine-pre|fix-comm|
|00001400| 61 6e 64 20 62 6f 6f 6b | 6d 61 72 6b 2d 6d 61 70 |and book|mark-map|
|00001410| 20 64 65 66 69 6e 65 2d | 6b 65 79 20 22 78 22 20 | define-|key "x" |
|00001420| 62 6f 6f 6b 6d 61 72 6b | 2d 73 65 74 20 22 6d 22 |bookmark|-set "m"|
|00001430| 20 22 6a 22 20 62 6f 6f | 6b 6d 61 72 6b 2d 6a 75 | "j" boo|kmark-ju|
|00001440| 6d 70 20 22 67 22 20 22 | 69 22 20 62 6f 6f 6b 6d |mp "g" "|i" bookm|
|00001450| 61 72 6b 2d 69 6e 73 65 | 72 74 20 22 65 22 20 65 |ark-inse|rt "e" e|
|00001460| 64 69 74 2d 62 6f 6f 6b | 6d 61 72 6b 73 20 22 66 |dit-book|marks "f|
|00001470| 22 20 62 6f 6f 6b 6d 61 | 72 6b 2d 69 6e 73 65 72 |" bookma|rk-inser|
|00001480| 74 2d 6c 6f 63 61 74 69 | 6f 6e 20 22 72 22 20 62 |t-locati|on "r" b|
|00001490| 6f 6f 6b 6d 61 72 6b 2d | 72 65 6e 61 6d 65 20 22 |ookmark-|rename "|
|000014a0| 64 22 20 62 6f 6f 6b 6d | 61 72 6b 2d 64 65 6c 65 |d" bookm|ark-dele|
|000014b0| 74 65 20 22 6c 22 20 62 | 6f 6f 6b 6d 61 72 6b 2d |te "l" b|ookmark-|
|000014c0| 6c 6f 61 64 20 22 77 22 | 20 62 6f 6f 6b 6d 61 72 |load "w"| bookmar|
|000014d0| 6b 2d 77 72 69 74 65 20 | 22 73 22 20 62 6f 6f 6b |k-write |"s" book|
|000014e0| 6d 61 72 6b 2d 73 61 76 | 65 5d 20 34 29 0a 23 40 |mark-sav|e] 4).#@|
|000014f0| 35 32 20 4b 65 79 6d 61 | 70 20 66 6f 72 20 63 6f |52 Keyma|p for co|
|00001500| 6d 70 6f 73 69 6e 67 20 | 61 6e 20 61 6e 6e 6f 74 |mposing |an annot|
|00001510| 61 74 69 6f 6e 20 66 6f | 72 20 61 20 62 6f 6f 6b |ation fo|r a book|
|00001520| 6d 61 72 6b 2e 1f 0a 28 | 64 65 66 76 61 72 20 62 |mark...(|defvar b|
|00001530| 6f 6f 6b 6d 61 72 6b 2d | 72 65 61 64 2d 61 6e 6e |ookmark-|read-ann|
|00001540| 6f 74 61 74 69 6f 6e 2d | 6d 6f 64 65 2d 6d 61 70 |otation-|mode-map|
|00001550| 20 28 63 6f 70 79 2d 6b | 65 79 6d 61 70 20 74 65 | (copy-k|eymap te|
|00001560| 78 74 2d 6d 6f 64 65 2d | 6d 61 70 29 20 28 23 24 |xt-mode-|map) (#$|
|00001570| 20 2e 20 35 33 36 33 29 | 29 0a 28 64 65 66 69 6e | . 5363)|).(defin|
|00001580| 65 2d 6b 65 79 20 62 6f | 6f 6b 6d 61 72 6b 2d 72 |e-key bo|okmark-r|
|00001590| 65 61 64 2d 61 6e 6e 6f | 74 61 74 69 6f 6e 2d 6d |ead-anno|tation-m|
|000015a0| 6f 64 65 2d 6d 61 70 20 | 22 03 03 22 20 27 62 6f |ode-map |".." 'bo|
|000015b0| 6f 6b 6d 61 72 6b 2d 73 | 65 6e 64 2d 61 6e 6e 6f |okmark-s|end-anno|
|000015c0| 74 61 74 69 6f 6e 29 0a | 23 40 35 32 36 20 41 73 |tation).|#@526 As|
|000015d0| 73 6f 63 69 61 74 69 6f | 6e 20 6c 69 73 74 20 6f |sociatio|n list o|
|000015e0| 66 20 62 6f 6f 6b 6d 61 | 72 6b 73 20 61 6e 64 20 |f bookma|rks and |
|000015f0| 74 68 65 69 72 20 72 65 | 63 6f 72 64 73 2e 0a 59 |their re|cords..Y|
|00001600| 6f 75 20 70 72 6f 62 61 | 62 6c 79 20 64 6f 6e 27 |ou proba|bly don'|
|00001610| 74 20 77 61 6e 74 20 74 | 6f 20 63 68 61 6e 67 65 |t want t|o change|
|00001620| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 74 68 | the val|ue of th|
|00001630| 69 73 20 61 6c 69 73 74 | 20 79 6f 75 72 73 65 6c |is alist| yoursel|
|00001640| 66 3b 0a 69 6e 73 74 65 | 61 64 2c 20 6c 65 74 20 |f;.inste|ad, let |
|00001650| 74 68 65 20 76 61 72 69 | 6f 75 73 20 62 6f 6f 6b |the vari|ous book|
|00001660| 6d 61 72 6b 20 66 75 6e | 63 74 69 6f 6e 73 20 64 |mark fun|ctions d|
|00001670| 6f 20 69 74 20 66 6f 72 | 20 79 6f 75 2e 0a 0a 54 |o it for| you...T|
|00001680| 68 65 20 66 6f 72 6d 61 | 74 20 6f 66 20 74 68 65 |he forma|t of the|
|00001690| 20 61 6c 69 73 74 20 69 | 73 0a 0a 20 20 20 20 20 | alist i|s.. |
|000016a0| 20 20 28 42 4f 4f 4b 4d | 41 52 4b 31 20 42 4f 4f | (BOOKM|ARK1 BOO|
|000016b0| 4b 4d 41 52 4b 32 20 2e | 2e 2e 29 0a 0a 77 68 65 |KMARK2 .|..)..whe|
|000016c0| 72 65 20 65 61 63 68 20 | 42 4f 4f 4b 4d 41 52 4b |re each |BOOKMARK|
|000016d0| 20 69 73 20 6f 66 20 74 | 68 65 20 66 6f 72 6d 0a | is of t|he form.|
|000016e0| 0a 28 4e 41 4d 45 0a 20 | 20 28 66 69 6c 65 6e 61 |.(NAME. | (filena|
|000016f0| 6d 65 20 2e 20 46 49 4c | 45 29 0a 20 20 28 66 72 |me . FIL|E). (fr|
|00001700| 6f 6e 74 2d 63 6f 6e 74 | 65 78 74 2d 73 74 72 69 |ont-cont|ext-stri|
|00001710| 6e 67 20 2e 20 46 52 4f | 4e 54 2d 53 54 52 29 0a |ng . FRO|NT-STR).|
|00001720| 20 20 28 72 65 61 72 2d | 63 6f 6e 74 65 78 74 2d | (rear-|context-|
|00001730| 73 74 72 69 6e 67 20 20 | 2e 20 52 45 41 52 2d 53 |string |. REAR-S|
|00001740| 54 52 29 0a 20 20 28 70 | 6f 73 69 74 69 6f 6e 20 |TR). (p|osition |
|00001750| 2e 20 50 4f 53 29 0a 20 | 20 28 69 6e 66 6f 2d 6e |. POS). | (info-n|
|00001760| 6f 64 65 20 2e 20 50 4f | 53 29 0a 20 20 28 61 6e |ode . PO|S). (an|
|00001770| 6e 6f 74 61 74 69 6f 6e | 20 2e 20 41 4e 4e 4f 54 |notation| . ANNOT|
|00001780| 41 54 49 4f 4e 29 29 0a | 0a 53 6f 20 74 68 65 20 |ATION)).|.So the |
|00001790| 63 64 72 20 6f 66 20 65 | 61 63 68 20 62 6f 6f 6b |cdr of e|ach book|
|000017a0| 6d 61 72 6b 20 69 73 20 | 61 6e 20 61 6c 69 73 74 |mark is |an alist|
|000017b0| 20 74 6f 6f 2e 0a 60 69 | 6e 66 6f 2d 6e 6f 64 65 | too..`i|nfo-node|
|000017c0| 27 20 69 73 20 6f 70 74 | 69 6f 6e 61 6c 2c 20 62 |' is opt|ional, b|
|000017d0| 79 20 74 68 65 20 77 61 | 79 2e 1f 0a 28 64 65 66 |y the wa|y...(def|
|000017e0| 76 61 72 20 62 6f 6f 6b | 6d 61 72 6b 2d 61 6c 69 |var book|mark-ali|
|000017f0| 73 74 20 6e 69 6c 20 28 | 23 24 20 2e 20 35 35 38 |st nil (|#$ . 558|
|00001800| 32 29 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |2)).(byt|e-code "|
|00001810| c0 c1 21 ac 82 c2 11 c1 | 0b 42 13 c4 c5 c6 5c 22 |..!.....|.B....\"|
|00001820| 87 22 20 5b 62 6f 75 6e | 64 70 20 62 6f 6f 6b 6d |." [boun|dp bookm|
|00001830| 61 72 6b 73 2d 61 6c 72 | 65 61 64 79 2d 6c 6f 61 |arks-alr|eady-loa|
|00001840| 64 65 64 20 6e 69 6c 20 | 63 75 72 72 65 6e 74 2d |ded nil |current-|
|00001850| 6c 6f 61 64 2d 6c 69 73 | 74 20 61 64 64 2d 68 6f |load-lis|t add-ho|
|00001860| 6f 6b 20 6b 69 6c 6c 2d | 65 6d 61 63 73 2d 68 6f |ok kill-|emacs-ho|
|00001870| 6f 6b 20 23 5b 6e 69 6c | 20 22 c0 c1 21 ad 8a 5c |ok #[nil| "..!..\|
|00001880| 6e ad 87 c3 c4 21 ad 82 | c5 20 87 22 20 5b 66 65 |n....!..|. ." [fe|
|00001890| 61 74 75 72 65 70 20 62 | 6f 6f 6b 6d 61 72 6b 20 |aturep b|ookmark |
|000018a0| 62 6f 6f 6b 6d 61 72 6b | 2d 61 6c 69 73 74 20 62 |bookmark|-alist b|
|000018b0| 6f 6f 6b 6d 61 72 6b 2d | 74 69 6d 65 2d 74 6f 2d |ookmark-|time-to-|
|000018c0| 73 61 76 65 2d 70 20 74 | 20 62 6f 6f 6b 6d 61 72 |save-p t| bookmar|
|000018d0| 6b 2d 73 61 76 65 5d 20 | 32 5d 5d 20 33 29 0a 23 |k-save] |2]] 3).#|
|000018e0| 40 31 34 30 20 4e 61 6d | 65 20 6f 66 20 62 6f 6f |@140 Nam|e of boo|
|000018f0| 6b 6d 61 72 6b 20 6d 6f | 73 74 20 72 65 63 65 6e |kmark mo|st recen|
|00001900| 74 6c 79 20 75 73 65 64 | 20 69 6e 20 74 68 65 20 |tly used| in the |
|00001910| 63 75 72 72 65 6e 74 20 | 66 69 6c 65 2e 0a 49 74 |current |file..It|
|00001920| 20 69 73 20 62 75 66 66 | 65 72 20 6c 6f 63 61 6c | is buff|er local|
|00001930| 2c 20 75 73 65 64 20 74 | 6f 20 6d 61 6b 65 20 6d |, used t|o make m|
|00001940| 6f 76 69 6e 67 20 61 20 | 62 6f 6f 6b 6d 61 72 6b |oving a |bookmark|
|00001950| 20 66 6f 72 77 61 72 64 | 0a 74 68 72 6f 75 67 68 | forward|.through|
|00001960| 20 61 20 66 69 6c 65 20 | 65 61 73 69 65 72 2e 1f | a file |easier..|
|00001970| 0a 28 64 65 66 76 61 72 | 20 62 6f 6f 6b 6d 61 72 |.(defvar| bookmar|
|00001980| 6b 2d 63 75 72 72 65 6e | 74 2d 62 6f 6f 6b 6d 61 |k-curren|t-bookma|
|00001990| 72 6b 20 6e 69 6c 20 28 | 23 24 20 2e 20 36 33 37 |rk nil (|#$ . 637|
|000019a0| 33 29 29 0a 28 6d 61 6b | 65 2d 76 61 72 69 61 62 |3)).(mak|e-variab|
|000019b0| 6c 65 2d 62 75 66 66 65 | 72 2d 6c 6f 63 61 6c 20 |le-buffe|r-local |
|000019c0| 27 62 6f 6f 6b 6d 61 72 | 6b 2d 63 75 72 72 65 6e |'bookmar|k-curren|
|000019d0| 74 2d 62 6f 6f 6b 6d 61 | 72 6b 29 0a 23 40 36 37 |t-bookma|rk).#@67|
|000019e0| 20 4e 75 6d 62 65 72 20 | 6f 66 20 6d 6f 64 69 66 | Number |of modif|
|000019f0| 69 63 61 74 69 6f 6e 73 | 20 74 6f 20 62 6f 6f 6b |ications| to book|
|00001a00| 6d 61 72 6b 20 6c 69 73 | 74 20 73 69 6e 63 65 20 |mark lis|t since |
|00001a10| 69 74 20 77 61 73 20 6c | 61 73 74 20 73 61 76 65 |it was l|ast save|
|00001a20| 64 2e 1f 0a 28 64 65 66 | 76 61 72 20 62 6f 6f 6b |d...(def|var book|
|00001a30| 6d 61 72 6b 2d 61 6c 69 | 73 74 2d 6d 6f 64 69 66 |mark-ali|st-modif|
|00001a40| 69 63 61 74 69 6f 6e 2d | 63 6f 75 6e 74 20 30 20 |ication-|count 0 |
|00001a50| 28 23 24 20 2e 20 36 36 | 32 35 29 29 0a 23 40 37 |(#$ . 66|25)).#@7|
|00001a60| 30 20 4c 65 6e 67 74 68 | 20 6f 66 20 74 68 65 20 |0 Length| of the |
|00001a70| 63 6f 6e 74 65 78 74 20 | 73 74 72 69 6e 67 73 20 |context |strings |
|00001a80| 72 65 63 6f 72 64 65 64 | 20 6f 6e 20 65 69 74 68 |recorded| on eith|
|00001a90| 65 72 20 73 69 64 65 20 | 6f 66 20 61 20 62 6f 6f |er side |of a boo|
|00001aa0| 6b 6d 61 72 6b 2e 1f 0a | 28 64 65 66 76 61 72 20 |kmark...|(defvar |
|00001ab0| 62 6f 6f 6b 6d 61 72 6b | 2d 73 65 61 72 63 68 2d |bookmark|-search-|
|00001ac0| 73 69 7a 65 20 31 36 20 | 28 23 24 20 2e 20 36 37 |size 16 |(#$ . 67|
|00001ad0| 35 34 29 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |54)).(by|te-code |
|00001ae0| 22 c0 c1 21 ac 82 c2 11 | c1 0b 42 13 c0 c4 21 ac |"..!....|..B...!.|
|00001af0| 82 c2 14 c4 0b 42 13 c0 | c5 21 ac 82 c6 15 c5 0b |.....B..|.!......|
|00001b00| 42 13 c6 87 22 20 5b 62 | 6f 75 6e 64 70 20 62 6f |B..." [b|oundp bo|
|00001b10| 6f 6b 6d 61 72 6b 2d 63 | 75 72 72 65 6e 74 2d 70 |okmark-c|urrent-p|
|00001b20| 6f 69 6e 74 20 30 20 63 | 75 72 72 65 6e 74 2d 6c |oint 0 c|urrent-l|
|00001b30| 6f 61 64 2d 6c 69 73 74 | 20 62 6f 6f 6b 6d 61 72 |oad-list| bookmar|
|00001b40| 6b 2d 79 61 6e 6b 2d 70 | 6f 69 6e 74 20 62 6f 6f |k-yank-p|oint boo|
|00001b50| 6b 6d 61 72 6b 2d 63 75 | 72 72 65 6e 74 2d 62 75 |kmark-cu|rrent-bu|
|00001b60| 66 66 65 72 20 6e 69 6c | 5d 20 32 29 0a 23 40 36 |ffer nil|] 2).#@6|
|00001b70| 38 20 52 65 74 75 72 6e | 20 6e 61 6d 65 20 6f 66 |8 Return| name of|
|00001b80| 20 46 55 4c 4c 2d 52 45 | 43 4f 52 44 20 28 61 6e | FULL-RE|CORD (an|
|00001b90| 20 61 6c 69 73 74 20 65 | 6c 65 6d 65 6e 74 20 69 | alist e|lement i|
|00001ba0| 6e 73 74 65 61 64 20 6f | 66 20 61 20 73 74 72 69 |nstead o|f a stri|
|00001bb0| 6e 67 29 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ng)...(d|efalias |
|00001bc0| 27 62 6f 6f 6b 6d 61 72 | 6b 2d 6e 61 6d 65 2d 66 |'bookmar|k-name-f|
|00001bd0| 72 6f 6d 2d 66 75 6c 6c | 2d 72 65 63 6f 72 64 20 |rom-full|-record |
|00001be0| 23 5b 28 66 75 6c 6c 2d | 72 65 63 6f 72 64 29 20 |#[(full-|record) |
|00001bf0| 22 08 40 87 22 20 5b 66 | 75 6c 6c 2d 72 65 63 6f |".@." [f|ull-reco|
|00001c00| 72 64 5d 20 31 20 28 23 | 24 20 2e 20 37 30 32 36 |rd] 1 (#|$ . 7026|
|00001c10| 29 5d 29 0a 23 40 34 36 | 20 52 65 74 75 72 6e 20 |)]).#@46| Return |
|00001c20| 61 20 6c 69 73 74 20 6f | 66 20 61 6c 6c 20 63 75 |a list o|f all cu|
|00001c30| 72 72 65 6e 74 20 62 6f | 6f 6b 6d 61 72 6b 20 6e |rrent bo|okmark n|
|00001c40| 61 6d 65 73 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ames...(|defalias|
|00001c50| 20 27 62 6f 6f 6b 6d 61 | 72 6b 2d 61 6c 6c 2d 6e | 'bookma|rk-all-n|
|00001c60| 61 6d 65 73 20 23 5b 6e | 69 6c 20 22 c0 20 88 c1 |ames #[n|il ". ..|
|00001c70| c2 0b 5c 22 87 22 20 5b | 62 6f 6f 6b 6d 61 72 6b |..\"." [|bookmark|
|00001c80| 2d 6d 61 79 62 65 2d 6c | 6f 61 64 2d 64 65 66 61 |-maybe-l|oad-defa|
|00001c90| 75 6c 74 2d 66 69 6c 65 | 20 6d 61 70 63 61 72 20 |ult-file| mapcar |
|00001ca0| 23 5b 28 66 75 6c 6c 2d | 72 65 63 6f 72 64 29 20 |#[(full-|record) |
|00001cb0| 22 c0 09 21 87 22 20 5b | 62 6f 6f 6b 6d 61 72 6b |"..!." [|bookmark|
|00001cc0| 2d 6e 61 6d 65 2d 66 72 | 6f 6d 2d 66 75 6c 6c 2d |-name-fr|om-full-|
|00001cd0| 72 65 63 6f 72 64 20 66 | 75 6c 6c 2d 72 65 63 6f |record f|ull-reco|
|00001ce0| 72 64 5d 20 32 5d 20 62 | 6f 6f 6b 6d 61 72 6b 2d |rd] 2] b|ookmark-|
|00001cf0| 61 6c 69 73 74 5d 20 33 | 20 28 23 24 20 2e 20 37 |alist] 3| (#$ . 7|
|00001d00| 31 39 33 29 5d 29 0a 23 | 40 35 35 20 52 65 74 75 |193)]).#|@55 Retu|
|00001d10| 72 6e 20 74 68 65 20 66 | 75 6c 6c 20 65 6e 74 72 |rn the f|ull entr|
|00001d20| 79 20 66 6f 72 20 42 4f | 4f 4b 4d 41 52 4b 20 69 |y for BO|OKMARK i|
|00001d30| 6e 20 62 6f 6f 6b 6d 61 | 72 6b 2d 61 6c 69 73 74 |n bookma|rk-alist|
|00001d40| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 62 6f |...(defa|lias 'bo|
|00001d50| 6f 6b 6d 61 72 6b 2d 67 | 65 74 2d 62 6f 6f 6b 6d |okmark-g|et-bookm|
|00001d60| 61 72 6b 20 23 5b 28 62 | 6f 6f 6b 6d 61 72 6b 29 |ark #[(b|ookmark)|
|00001d70| 20 22 c0 09 5c 6e 5c 22 | 87 22 20 5b 61 73 73 6f | "..\n\"|." [asso|
|00001d80| 63 20 62 6f 6f 6b 6d 61 | 72 6b 20 62 6f 6f 6b 6d |c bookma|rk bookm|
|00001d90| 61 72 6b 2d 61 6c 69 73 | 74 5d 20 33 20 28 23 24 |ark-alis|t] 3 (#$|
|00001da0| 20 2e 20 37 34 33 36 29 | 5d 29 0a 23 40 31 30 31 | . 7436)|]).#@101|
|00001db0| 20 52 65 74 75 72 6e 20 | 74 68 65 20 67 75 74 73 | Return |the guts|
|00001dc0| 20 6f 66 20 74 68 65 20 | 65 6e 74 72 79 20 66 6f | of the |entry fo|
|00001dd0| 72 20 42 4f 4f 4b 4d 41 | 52 4b 20 69 6e 20 62 6f |r BOOKMA|RK in bo|
|00001de0| 6f 6b 6d 61 72 6b 2d 61 | 6c 69 73 74 2e 0a 54 68 |okmark-a|list..Th|
|00001df0| 61 74 20 69 73 2c 20 61 | 6c 6c 20 69 6e 66 6f 72 |at is, a|ll infor|
|00001e00| 6d 61 74 69 6f 6e 20 62 | 75 74 20 74 68 65 20 6e |mation b|ut the n|
|00001e10| 61 6d 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ame...(d|efalias |
|00001e20| 27 62 6f 6f 6b 6d 61 72 | 6b 2d 67 65 74 2d 62 6f |'bookmar|k-get-bo|
|00001e30| 6f 6b 6d 61 72 6b 2d 72 | 65 63 6f 72 64 20 23 5b |okmark-r|ecord #[|
|00001e40| 28 62 6f 6f 6b 6d 61 72 | 6b 29 20 22 c0 09 21 41 |(bookmar|k) "..!A|
|00001e50| 40 87 22 20 5b 62 6f 6f | 6b 6d 61 72 6b 2d 67 65 |@." [boo|kmark-ge|
|00001e60| 74 2d 62 6f 6f 6b 6d 61 | 72 6b 20 62 6f 6f 6b 6d |t-bookma|rk bookm|
|00001e70| 61 72 6b 5d 20 32 20 28 | 23 24 20 2e 20 37 36 30 |ark] 2 (|#$ . 760|
|00001e80| 31 29 5d 29 0a 23 40 33 | 33 20 53 65 74 20 42 4f |1)]).#@3|3 Set BO|
|00001e90| 4f 4b 4d 41 52 4b 27 73 | 20 6e 61 6d 65 20 74 6f |OKMARK's| name to|
|00001ea0| 20 4e 45 57 4e 41 4d 45 | 2e 1f 0a 28 64 65 66 61 | NEWNAME|...(defa|
|00001eb0| 6c 69 61 73 20 27 62 6f | 6f 6b 6d 61 72 6b 2d 73 |lias 'bo|okmark-s|
|00001ec0| 65 74 2d 6e 61 6d 65 20 | 23 5b 28 62 6f 6f 6b 6d |et-name |#[(bookm|
|00001ed0| 61 72 6b 20 6e 65 77 6e | 61 6d 65 29 20 22 c0 09 |ark newn|ame) "..|
|00001ee0| 21 5c 6e a0 87 22 20 5b | 62 6f 6f 6b 6d 61 72 6b |!\n.." [|bookmark|
|00001ef0| 2d 67 65 74 2d 62 6f 6f | 6b 6d 61 72 6b 20 62 6f |-get-boo|kmark bo|
|00001f00| 6f 6b 6d 61 72 6b 20 6e | 65 77 6e 61 6d 65 5d 20 |okmark n|ewname] |
|00001f10| 32 20 28 23 24 20 2e 20 | 37 38 31 38 29 5d 29 0a |2 (#$ . |7818)]).|
|00001f20| 23 40 35 32 20 52 65 74 | 75 72 6e 20 74 68 65 20 |#@52 Ret|urn the |
|00001f30| 61 6e 6e 6f 74 61 74 69 | 6f 6e 20 6f 66 20 42 4f |annotati|on of BO|
|00001f40| 4f 4b 4d 41 52 4b 2c 20 | 6f 72 20 6e 69 6c 20 69 |OKMARK, |or nil i|
|00001f50| 66 20 6e 6f 6e 65 2e 1f | 0a 28 64 65 66 61 6c 69 |f none..|.(defali|
|00001f60| 61 73 20 27 62 6f 6f 6b | 6d 61 72 6b 2d 67 65 74 |as 'book|mark-get|
|00001f70| 2d 61 6e 6e 6f 74 61 74 | 69 6f 6e 20 23 5b 28 62 |-annotat|ion #[(b|
|00001f80| 6f 6f 6b 6d 61 72 6b 29 | 20 22 c0 c1 5c 6e 21 b7 |ookmark)| "..\n!.|
|00001f90| 41 87 22 20 5b 61 6e 6e | 6f 74 61 74 69 6f 6e 20 |A." [ann|otation |
|00001fa0| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 62 6f 6f |bookmark|-get-boo|
|00001fb0| 6b 6d 61 72 6b 2d 72 65 | 63 6f 72 64 20 62 6f 6f |kmark-re|cord boo|
|00001fc0| 6b 6d 61 72 6b 5d 20 33 | 20 28 23 24 20 2e 20 37 |kmark] 3| (#$ . 7|
|00001fd0| 39 37 33 29 5d 29 0a 23 | 40 34 30 20 53 65 74 20 |973)]).#|@40 Set |
|00001fe0| 74 68 65 20 61 6e 6e 6f | 74 61 74 69 6f 6e 20 6f |the anno|tation o|
|00001ff0| 66 20 42 4f 4f 4b 4d 41 | 52 4b 20 74 6f 20 41 4e |f BOOKMA|RK to AN|
|00002000| 4e 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 62 |N...(def|alias 'b|
|00002010| 6f 6f 6b 6d 61 72 6b 2d | 73 65 74 2d 61 6e 6e 6f |ookmark-|set-anno|
|00002020| 74 61 74 69 6f 6e 20 23 | 5b 28 62 6f 6f 6b 6d 61 |tation #|[(bookma|
|00002030| 72 6b 20 61 6e 6e 29 20 | 22 c0 c1 5c 6e 21 b7 89 |rk ann) |"..\n!..|
|00002040| 1b ab 85 0b 0c a1 aa 88 | c1 5c 6e 21 c0 0c 42 43 |........|.\n!..BC|
|00002050| a4 29 87 22 20 5b 61 6e | 6e 6f 74 61 74 69 6f 6e |.)." [an|notation|
|00002060| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 67 65 74 2d 62 6f | bookmar|k-get-bo|
|00002070| 6f 6b 6d 61 72 6b 2d 72 | 65 63 6f 72 64 20 62 6f |okmark-r|ecord bo|
|00002080| 6f 6b 6d 61 72 6b 20 63 | 65 6c 6c 20 61 6e 6e 5d |okmark c|ell ann]|
|00002090| 20 34 20 28 23 24 20 2e | 20 38 31 35 36 29 5d 29 | 4 (#$ .| 8156)])|
|000020a0| 0a 23 40 33 39 20 52 65 | 74 75 72 6e 20 74 68 65 |.#@39 Re|turn the|
|000020b0| 20 66 75 6c 6c 20 66 69 | 6c 65 6e 61 6d 65 20 6f | full fi|lename o|
|000020c0| 66 20 42 4f 4f 4b 4d 41 | 52 4b 2e 1f 0a 28 64 65 |f BOOKMA|RK...(de|
|000020d0| 66 61 6c 69 61 73 20 27 | 62 6f 6f 6b 6d 61 72 6b |falias '|bookmark|
|000020e0| 2d 67 65 74 2d 66 69 6c | 65 6e 61 6d 65 20 23 5b |-get-fil|ename #[|
|000020f0| 28 62 6f 6f 6b 6d 61 72 | 6b 29 20 22 c0 c1 5c 6e |(bookmar|k) "..\n|
|00002100| 21 b7 41 87 22 20 5b 66 | 69 6c 65 6e 61 6d 65 20 |!.A." [f|ilename |
|00002110| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 62 6f 6f |bookmark|-get-boo|
|00002120| 6b 6d 61 72 6b 2d 72 65 | 63 6f 72 64 20 62 6f 6f |kmark-re|cord boo|
|00002130| 6b 6d 61 72 6b 5d 20 33 | 20 28 23 24 20 2e 20 38 |kmark] 3| (#$ . 8|
|00002140| 33 35 38 29 5d 29 0a 23 | 40 34 38 20 53 65 74 20 |358)]).#|@48 Set |
|00002150| 74 68 65 20 66 75 6c 6c | 20 66 69 6c 65 6e 61 6d |the full| filenam|
|00002160| 65 20 6f 66 20 42 4f 4f | 4b 4d 41 52 4b 20 74 6f |e of BOO|KMARK to|
|00002170| 20 46 49 4c 45 4e 41 4d | 45 2e 1f 0a 28 64 65 66 | FILENAM|E...(def|
|00002180| 61 6c 69 61 73 20 27 62 | 6f 6f 6b 6d 61 72 6b 2d |alias 'b|ookmark-|
|00002190| 73 65 74 2d 66 69 6c 65 | 6e 61 6d 65 20 23 5b 28 |set-file|name #[(|
|000021a0| 62 6f 6f 6b 6d 61 72 6b | 20 66 69 6c 65 6e 61 6d |bookmark| filenam|
|000021b0| 65 29 20 22 c0 c1 5c 6e | 21 b7 89 1b ab 85 0b 08 |e) "..\n|!.......|
|000021c0| a1 aa 88 c1 5c 6e 21 c0 | 08 42 43 a4 29 87 22 20 |....\n!.|.BC.)." |
|000021d0| 5b 66 69 6c 65 6e 61 6d | 65 20 62 6f 6f 6b 6d 61 |[filenam|e bookma|
|000021e0| 72 6b 2d 67 65 74 2d 62 | 6f 6f 6b 6d 61 72 6b 2d |rk-get-b|ookmark-|
|000021f0| 72 65 63 6f 72 64 20 62 | 6f 6f 6b 6d 61 72 6b 20 |record b|ookmark |
|00002200| 63 65 6c 6c 5d 20 34 20 | 28 23 24 20 2e 20 38 35 |cell] 4 |(#$ . 85|
|00002210| 32 34 29 5d 29 0a 23 40 | 34 38 20 52 65 74 75 72 |24)]).#@|48 Retur|
|00002220| 6e 20 74 68 65 20 70 6f | 73 69 74 69 6f 6e 20 28 |n the po|sition (|
|00002230| 69 2e 65 2e 3a 20 70 6f | 69 6e 74 29 20 6f 66 20 |i.e.: po|int) of |
|00002240| 42 4f 4f 4b 4d 41 52 4b | 2e 1f 0a 28 64 65 66 61 |BOOKMARK|...(defa|
|00002250| 6c 69 61 73 20 27 62 6f | 6f 6b 6d 61 72 6b 2d 67 |lias 'bo|okmark-g|
|00002260| 65 74 2d 70 6f 73 69 74 | 69 6f 6e 20 23 5b 28 62 |et-posit|ion #[(b|
|00002270| 6f 6f 6b 6d 61 72 6b 29 | 20 22 c0 c1 5c 6e 21 b7 |ookmark)| "..\n!.|
|00002280| 41 87 22 20 5b 70 6f 73 | 69 74 69 6f 6e 20 62 6f |A." [pos|ition bo|
|00002290| 6f 6b 6d 61 72 6b 2d 67 | 65 74 2d 62 6f 6f 6b 6d |okmark-g|et-bookm|
|000022a0| 61 72 6b 2d 72 65 63 6f | 72 64 20 62 6f 6f 6b 6d |ark-reco|rd bookm|
|000022b0| 61 72 6b 5d 20 33 20 28 | 23 24 20 2e 20 38 37 33 |ark] 3 (|#$ . 873|
|000022c0| 31 29 5d 29 0a 23 40 35 | 37 20 53 65 74 20 74 68 |1)]).#@5|7 Set th|
|000022d0| 65 20 70 6f 73 69 74 69 | 6f 6e 20 28 69 2e 65 2e |e positi|on (i.e.|
|000022e0| 3a 20 70 6f 69 6e 74 29 | 20 6f 66 20 42 4f 4f 4b |: point)| of BOOK|
|000022f0| 4d 41 52 4b 20 74 6f 20 | 50 4f 53 49 54 49 4f 4e |MARK to |POSITION|
|00002300| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 62 6f |...(defa|lias 'bo|
|00002310| 6f 6b 6d 61 72 6b 2d 73 | 65 74 2d 70 6f 73 69 74 |okmark-s|et-posit|
|00002320| 69 6f 6e 20 23 5b 28 62 | 6f 6f 6b 6d 61 72 6b 20 |ion #[(b|ookmark |
|00002330| 70 6f 73 69 74 69 6f 6e | 29 20 22 c0 c1 5c 6e 21 |position|) "..\n!|
|00002340| b7 89 1b ab 85 0b 08 a1 | aa 88 c1 5c 6e 21 c0 08 |........|...\n!..|
|00002350| 42 43 a4 29 87 22 20 5b | 70 6f 73 69 74 69 6f 6e |BC.)." [|position|
|00002360| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 67 65 74 2d 62 6f | bookmar|k-get-bo|
|00002370| 6f 6b 6d 61 72 6b 2d 72 | 65 63 6f 72 64 20 62 6f |okmark-r|ecord bo|
|00002380| 6f 6b 6d 61 72 6b 20 63 | 65 6c 6c 5d 20 34 20 28 |okmark c|ell] 4 (|
|00002390| 23 24 20 2e 20 38 39 30 | 36 29 5d 29 0a 23 40 34 |#$ . 890|6)]).#@4|
|000023a0| 36 20 52 65 74 75 72 6e | 20 74 68 65 20 66 72 6f |6 Return| the fro|
|000023b0| 6e 74 2d 63 6f 6e 74 65 | 78 74 2d 73 74 72 69 6e |nt-conte|xt-strin|
|000023c0| 67 20 6f 66 20 42 4f 4f | 4b 4d 41 52 4b 2e 1f 0a |g of BOO|KMARK...|
|000023d0| 28 64 65 66 61 6c 69 61 | 73 20 27 62 6f 6f 6b 6d |(defalia|s 'bookm|
|000023e0| 61 72 6b 2d 67 65 74 2d | 66 72 6f 6e 74 2d 63 6f |ark-get-|front-co|
|000023f0| 6e 74 65 78 74 2d 73 74 | 72 69 6e 67 20 23 5b 28 |ntext-st|ring #[(|
|00002400| 62 6f 6f 6b 6d 61 72 6b | 29 20 22 c0 c1 5c 6e 21 |bookmark|) "..\n!|
|00002410| b7 41 87 22 20 5b 66 72 | 6f 6e 74 2d 63 6f 6e 74 |.A." [fr|ont-cont|
|00002420| 65 78 74 2d 73 74 72 69 | 6e 67 20 62 6f 6f 6b 6d |ext-stri|ng bookm|
|00002430| 61 72 6b 2d 67 65 74 2d | 62 6f 6f 6b 6d 61 72 6b |ark-get-|bookmark|
|00002440| 2d 72 65 63 6f 72 64 20 | 62 6f 6f 6b 6d 61 72 6b |-record |bookmark|
|00002450| 5d 20 33 20 28 23 24 20 | 2e 20 39 31 32 32 29 5d |] 3 (#$ |. 9122)]|
|00002460| 29 0a 23 40 35 33 20 53 | 65 74 20 74 68 65 20 66 |).#@53 S|et the f|
|00002470| 72 6f 6e 74 2d 63 6f 6e | 74 65 78 74 2d 73 74 72 |ront-con|text-str|
|00002480| 69 6e 67 20 6f 66 20 42 | 4f 4f 4b 4d 41 52 4b 20 |ing of B|OOKMARK |
|00002490| 74 6f 20 53 54 52 49 4e | 47 2e 1f 0a 28 64 65 66 |to STRIN|G...(def|
|000024a0| 61 6c 69 61 73 20 27 62 | 6f 6f 6b 6d 61 72 6b 2d |alias 'b|ookmark-|
|000024b0| 73 65 74 2d 66 72 6f 6e | 74 2d 63 6f 6e 74 65 78 |set-fron|t-contex|
|000024c0| 74 2d 73 74 72 69 6e 67 | 20 23 5b 28 62 6f 6f 6b |t-string| #[(book|
|000024d0| 6d 61 72 6b 20 73 74 72 | 69 6e 67 29 20 22 c0 c1 |mark str|ing) "..|
|000024e0| 5c 6e 21 b7 89 1b ab 85 | 0b 0c a1 aa 88 c1 5c 6e |\n!.....|......\n|
|000024f0| 21 c0 0c 42 43 a4 29 87 | 22 20 5b 66 72 6f 6e 74 |!..BC.).|" [front|
|00002500| 2d 63 6f 6e 74 65 78 74 | 2d 73 74 72 69 6e 67 20 |-context|-string |
|00002510| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 62 6f 6f |bookmark|-get-boo|
|00002520| 6b 6d 61 72 6b 2d 72 65 | 63 6f 72 64 20 62 6f 6f |kmark-re|cord boo|
|00002530| 6b 6d 61 72 6b 20 63 65 | 6c 6c 20 73 74 72 69 6e |kmark ce|ll strin|
|00002540| 67 5d 20 34 20 28 23 24 | 20 2e 20 39 33 31 39 29 |g] 4 (#$| . 9319)|
|00002550| 5d 29 0a 23 40 34 35 20 | 52 65 74 75 72 6e 20 74 |]).#@45 |Return t|
|00002560| 68 65 20 72 65 61 72 2d | 63 6f 6e 74 65 78 74 2d |he rear-|context-|
|00002570| 73 74 72 69 6e 67 20 6f | 66 20 42 4f 4f 4b 4d 41 |string o|f BOOKMA|
|00002580| 52 4b 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |RK...(de|falias '|
|00002590| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 72 65 61 |bookmark|-get-rea|
|000025a0| 72 2d 63 6f 6e 74 65 78 | 74 2d 73 74 72 69 6e 67 |r-contex|t-string|
|000025b0| 20 23 5b 28 62 6f 6f 6b | 6d 61 72 6b 29 20 22 c0 | #[(book|mark) ".|
|000025c0| c1 5c 6e 21 b7 41 87 22 | 20 5b 72 65 61 72 2d 63 |.\n!.A."| [rear-c|
|000025d0| 6f 6e 74 65 78 74 2d 73 | 74 72 69 6e 67 20 62 6f |ontext-s|tring bo|
|000025e0| 6f 6b 6d 61 72 6b 2d 67 | 65 74 2d 62 6f 6f 6b 6d |okmark-g|et-bookm|
|000025f0| 61 72 6b 2d 72 65 63 6f | 72 64 20 62 6f 6f 6b 6d |ark-reco|rd bookm|
|00002600| 61 72 6b 5d 20 33 20 28 | 23 24 20 2e 20 39 35 36 |ark] 3 (|#$ . 956|
|00002610| 30 29 5d 29 0a 23 40 35 | 32 20 53 65 74 20 74 68 |0)]).#@5|2 Set th|
|00002620| 65 20 72 65 61 72 2d 63 | 6f 6e 74 65 78 74 2d 73 |e rear-c|ontext-s|
|00002630| 74 72 69 6e 67 20 6f 66 | 20 42 4f 4f 4b 4d 41 52 |tring of| BOOKMAR|
|00002640| 4b 20 74 6f 20 53 54 52 | 49 4e 47 2e 1f 0a 28 64 |K to STR|ING...(d|
|00002650| 65 66 61 6c 69 61 73 20 | 27 62 6f 6f 6b 6d 61 72 |efalias |'bookmar|
|00002660| 6b 2d 73 65 74 2d 72 65 | 61 72 2d 63 6f 6e 74 65 |k-set-re|ar-conte|
|00002670| 78 74 2d 73 74 72 69 6e | 67 20 23 5b 28 62 6f 6f |xt-strin|g #[(boo|
|00002680| 6b 6d 61 72 6b 20 73 74 | 72 69 6e 67 29 20 22 c0 |kmark st|ring) ".|
|00002690| c1 5c 6e 21 b7 89 1b ab | 85 0b 0c a1 aa 88 c1 5c |.\n!....|.......\|
|000026a0| 6e 21 c0 0c 42 43 a4 29 | 87 22 20 5b 72 65 61 72 |n!..BC.)|." [rear|
|000026b0| 2d 63 6f 6e 74 65 78 74 | 2d 73 74 72 69 6e 67 20 |-context|-string |
|000026c0| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 62 6f 6f |bookmark|-get-boo|
|000026d0| 6b 6d 61 72 6b 2d 72 65 | 63 6f 72 64 20 62 6f 6f |kmark-re|cord boo|
|000026e0| 6b 6d 61 72 6b 20 63 65 | 6c 6c 20 73 74 72 69 6e |kmark ce|ll strin|
|000026f0| 67 5d 20 34 20 28 23 24 | 20 2e 20 39 37 35 34 29 |g] 4 (#$| . 9754)|
|00002700| 5d 29 0a 23 40 34 35 20 | 47 65 74 20 74 68 65 20 |]).#@45 |Get the |
|00002710| 69 6e 66 6f 20 6e 6f 64 | 65 20 61 73 73 6f 63 69 |info nod|e associ|
|00002720| 61 74 65 64 20 77 69 74 | 68 20 42 4f 4f 4b 4d 41 |ated wit|h BOOKMA|
|00002730| 52 4b 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |RK...(de|falias '|
|00002740| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 69 6e 66 |bookmark|-get-inf|
|00002750| 6f 2d 6e 6f 64 65 20 23 | 5b 28 62 6f 6f 6b 6d 61 |o-node #|[(bookma|
|00002760| 72 6b 29 20 22 c0 c1 5c | 6e 21 b7 41 87 22 20 5b |rk) "..\|n!.A." [|
|00002770| 69 6e 66 6f 2d 6e 6f 64 | 65 20 62 6f 6f 6b 6d 61 |info-nod|e bookma|
|00002780| 72 6b 2d 67 65 74 2d 62 | 6f 6f 6b 6d 61 72 6b 2d |rk-get-b|ookmark-|
|00002790| 72 65 63 6f 72 64 20 62 | 6f 6f 6b 6d 61 72 6b 5d |record b|ookmark]|
|000027a0| 20 33 20 28 23 24 20 2e | 20 39 39 39 32 29 5d 29 | 3 (#$ .| 9992)])|
|000027b0| 0a 23 40 34 30 20 53 65 | 74 20 74 68 65 20 49 6e |.#@40 Se|t the In|
|000027c0| 66 6f 20 6e 6f 64 65 20 | 6f 66 20 42 4f 4f 4b 4d |fo node |of BOOKM|
|000027d0| 41 52 4b 20 74 6f 20 4e | 4f 44 45 2e 1f 0a 28 64 |ARK to N|ODE...(d|
|000027e0| 65 66 61 6c 69 61 73 20 | 27 62 6f 6f 6b 6d 61 72 |efalias |'bookmar|
|000027f0| 6b 2d 73 65 74 2d 69 6e | 66 6f 2d 6e 6f 64 65 20 |k-set-in|fo-node |
|00002800| 23 5b 28 62 6f 6f 6b 6d | 61 72 6b 20 6e 6f 64 65 |#[(bookm|ark node|
|00002810| 29 20 22 c0 c1 5c 6e 21 | b7 89 1b ab 86 0b 0c a1 |) "..\n!|........|
|00002820| 88 aa 89 c1 5c 6e 21 c0 | 0c 42 43 a4 88 29 c5 c6 |....\n!.|.BC..)..|
|00002830| c0 c1 5c 6e 21 b7 5c 22 | 88 c7 c8 21 87 22 20 5b |..\n!.\"|...!." [|
|00002840| 69 6e 66 6f 2d 6e 6f 64 | 65 20 62 6f 6f 6b 6d 61 |info-nod|e bookma|
|00002850| 72 6b 2d 67 65 74 2d 62 | 6f 6f 6b 6d 61 72 6b 2d |rk-get-b|ookmark-|
|00002860| 72 65 63 6f 72 64 20 62 | 6f 6f 6b 6d 61 72 6b 20 |record b|ookmark |
|00002870| 63 65 6c 6c 20 6e 6f 64 | 65 20 6d 65 73 73 61 67 |cell nod|e messag|
|00002880| 65 20 22 25 53 22 20 73 | 69 74 2d 66 6f 72 20 34 |e "%S" s|it-for 4|
|00002890| 5d 20 36 20 28 23 24 20 | 2e 20 31 30 31 36 36 29 |] 6 (#$ |. 10166)|
|000028a0| 5d 29 0a 23 40 34 32 20 | 54 68 65 20 68 69 73 74 |]).#@42 |The hist|
|000028b0| 6f 72 79 20 6c 69 73 74 | 20 66 6f 72 20 62 6f 6f |ory list| for boo|
|000028c0| 6b 6d 61 72 6b 20 66 75 | 6e 63 74 69 6f 6e 73 2e |kmark fu|nctions.|
|000028d0| 1f 0a 28 64 65 66 76 61 | 72 20 62 6f 6f 6b 6d 61 |..(defva|r bookma|
|000028e0| 72 6b 2d 68 69 73 74 6f | 72 79 20 6e 69 6c 20 28 |rk-histo|ry nil (|
|000028f0| 23 24 20 2e 20 31 30 34 | 30 38 29 29 0a 23 40 32 |#$ . 104|08)).#@2|
|00002900| 35 35 20 50 72 6f 6d 70 | 74 69 6e 67 20 77 69 74 |55 Promp|ting wit|
|00002910| 68 20 50 52 4f 4d 50 54 | 2c 20 72 65 61 64 20 61 |h PROMPT|, read a|
|00002920| 20 62 6f 6f 6b 6d 61 72 | 6b 20 6e 61 6d 65 20 69 | bookmar|k name i|
|00002930| 6e 20 63 6f 6d 70 6c 65 | 74 69 6f 6e 2e 0a 50 52 |n comple|tion..PR|
|00002940| 4f 4d 50 54 20 77 69 6c | 6c 20 67 65 74 20 61 20 |OMPT wil|l get a |
|00002950| 22 3a 20 22 20 73 74 75 | 63 6b 20 6f 6e 20 74 68 |": " stu|ck on th|
|00002960| 65 20 65 6e 64 20 6e 6f | 20 6d 61 74 74 65 72 20 |e end no| matter |
|00002970| 77 68 61 74 2c 20 73 6f | 20 79 6f 75 0a 70 72 6f |what, so| you.pro|
|00002980| 62 61 62 6c 79 20 64 6f | 6e 27 74 20 77 61 6e 74 |bably do|n't want|
|00002990| 20 74 6f 20 69 6e 63 6c | 75 64 65 20 6f 6e 65 20 | to incl|ude one |
|000029a0| 79 6f 75 72 73 65 6c 66 | 2e 0a 4f 70 74 69 6f 6e |yourself|..Option|
|000029b0| 61 6c 20 73 65 63 6f 6e | 64 20 61 72 67 20 44 45 |al secon|d arg DE|
|000029c0| 46 41 55 4c 54 20 69 73 | 20 61 20 73 74 72 69 6e |FAULT is| a strin|
|000029d0| 67 20 74 6f 20 72 65 74 | 75 72 6e 20 69 66 20 74 |g to ret|urn if t|
|000029e0| 68 65 20 75 73 65 72 20 | 65 6e 74 65 72 73 0a 74 |he user |enters.t|
|000029f0| 68 65 20 65 6d 70 74 79 | 20 73 74 72 69 6e 67 2e |he empty| string.|
|00002a00| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 62 6f 6f |..(defal|ias 'boo|
|00002a10| 6b 6d 61 72 6b 2d 63 6f | 6d 70 6c 65 74 69 6e 67 |kmark-co|mpleting|
|00002a20| 2d 72 65 61 64 20 23 5b | 28 70 72 6f 6d 70 74 20 |-read #[|(prompt |
|00002a30| 26 6f 70 74 69 6f 6e 61 | 6c 20 64 65 66 61 75 6c |&optiona|l defaul|
|00002a40| 74 29 20 22 c0 20 88 09 | 1a 0b 89 1b ab 88 0c c5 |t) ". ..|........|
|00002a50| c6 0b 5c 22 50 aa 83 0c | c7 50 1c c8 0c 0e 09 ca |..\"P...|.P......|
|00002a60| cb ca cc 26 06 89 1e 0d | ce 98 ab 84 0b 43 aa 83 |...&....|.....C..|
|00002a70| 0e 0d 43 2c 87 22 20 5b | 62 6f 6f 6b 6d 61 72 6b |..C,." [|bookmark|
|00002a80| 2d 6d 61 79 62 65 2d 6c | 6f 61 64 2d 64 65 66 61 |-maybe-l|oad-defa|
|00002a90| 75 6c 74 2d 66 69 6c 65 | 20 62 6f 6f 6b 6d 61 72 |ult-file| bookmar|
|00002aa0| 6b 2d 63 6f 6d 70 6c 65 | 74 69 6f 6e 2d 69 67 6e |k-comple|tion-ign|
|00002ab0| 6f 72 65 2d 63 61 73 65 | 20 63 6f 6d 70 6c 65 74 |ore-case| complet|
|00002ac0| 69 6f 6e 2d 69 67 6e 6f | 72 65 2d 63 61 73 65 20 |ion-igno|re-case |
|00002ad0| 64 65 66 61 75 6c 74 20 | 70 72 6f 6d 70 74 20 66 |default |prompt f|
|00002ae0| 6f 72 6d 61 74 20 22 20 | 28 25 73 29 3a 20 22 20 |ormat " |(%s): " |
|00002af0| 22 3a 20 22 20 63 6f 6d | 70 6c 65 74 69 6e 67 2d |": " com|pleting-|
|00002b00| 72 65 61 64 20 62 6f 6f | 6b 6d 61 72 6b 2d 61 6c |read boo|kmark-al|
|00002b10| 69 73 74 20 6e 69 6c 20 | 30 20 62 6f 6f 6b 6d 61 |ist nil |0 bookma|
|00002b20| 72 6b 2d 68 69 73 74 6f | 72 79 20 73 74 72 20 22 |rk-histo|ry str "|
|00002b30| 22 5d 20 38 20 28 23 24 | 20 2e 20 31 30 34 39 39 |"] 8 (#$| . 10499|
|00002b40| 29 5d 29 0a 23 40 32 31 | 35 20 50 75 74 20 53 54 |)]).#@21|5 Put ST|
|00002b50| 52 49 4e 47 20 69 6e 74 | 6f 20 74 68 65 20 62 6f |RING int|o the bo|
|00002b60| 6f 6b 6d 61 72 6b 20 70 | 72 6f 6d 70 74 20 68 69 |okmark p|rompt hi|
|00002b70| 73 74 6f 72 79 2c 20 69 | 66 20 63 61 6c 6c 65 72 |story, i|f caller|
|00002b80| 20 6e 6f 6e 2d 69 6e 74 | 65 72 61 63 74 69 76 65 | non-int|eractive|
|00002b90| 2e 0a 57 65 20 6e 65 65 | 64 20 74 68 69 73 20 62 |..We nee|d this b|
|00002ba0| 65 63 61 75 73 65 20 73 | 6f 6d 65 74 69 6d 65 73 |ecause s|ometimes|
|00002bb0| 20 62 6f 6f 6b 6d 61 72 | 6b 20 66 75 6e 63 74 69 | bookmar|k functi|
|00002bc0| 6f 6e 73 20 61 72 65 20 | 69 6e 76 6f 6b 65 64 20 |ons are |invoked |
|00002bd0| 66 72 6f 6d 0a 6d 65 6e | 75 73 2c 20 73 6f 20 60 |from.men|us, so `|
|00002be0| 63 6f 6d 70 6c 65 74 69 | 6e 67 2d 72 65 61 64 27 |completi|ng-read'|
|00002bf0| 20 6e 65 76 65 72 20 67 | 65 74 73 20 61 20 63 68 | never g|ets a ch|
|00002c00| 61 6e 63 65 20 74 6f 20 | 73 65 74 20 60 62 6f 6f |ance to |set `boo|
|00002c10| 6b 6d 61 72 6b 2d 68 69 | 73 74 6f 72 79 27 2e 1f |kmark-hi|story'..|
|00002c20| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00002c30| 6d 61 72 6b 2d 6d 61 79 | 62 65 2d 68 69 73 74 6f |mark-may|be-histo|
|00002c40| 72 69 63 69 7a 65 2d 73 | 74 72 69 6e 67 20 27 28 |ricize-s|tring '(|
|00002c50| 6d 61 63 72 6f 20 2e 20 | 23 5b 28 73 74 72 69 6e |macro . |#[(strin|
|00002c60| 67 29 20 22 c0 c1 c2 c3 | c4 0d c6 42 42 45 45 87 |g) "....|...BBEE.|
|00002c70| 22 20 5b 6f 72 20 28 69 | 6e 74 65 72 61 63 74 69 |" [or (i|nteracti|
|00002c80| 76 65 2d 70 29 20 73 65 | 74 71 20 62 6f 6f 6b 6d |ve-p) se|tq bookm|
|00002c90| 61 72 6b 2d 68 69 73 74 | 6f 72 79 20 63 6f 6e 73 |ark-hist|ory cons|
|00002ca0| 20 73 74 72 69 6e 67 20 | 28 62 6f 6f 6b 6d 61 72 | string |(bookmar|
|00002cb0| 6b 2d 68 69 73 74 6f 72 | 79 29 5d 20 37 20 28 23 |k-histor|y)] 7 (#|
|00002cc0| 24 20 2e 20 31 31 30 38 | 32 29 5d 29 29 0a 23 40 |$ . 1108|2)])).#@|
|00002cd0| 32 38 38 20 4d 61 6b 65 | 20 61 20 62 6f 6f 6b 6d |288 Make| a bookm|
|00002ce0| 61 72 6b 20 6e 61 6d 65 | 64 20 4e 41 4d 45 2e 0a |ark name|d NAME..|
|00002cf0| 4f 70 74 69 6f 6e 61 6c | 20 73 65 63 6f 6e 64 20 |Optional| second |
|00002d00| 61 72 67 20 41 4e 4e 4f | 54 41 54 49 4f 4e 20 67 |arg ANNO|TATION g|
|00002d10| 69 76 65 73 20 69 74 20 | 61 6e 20 61 6e 6e 6f 74 |ives it |an annot|
|00002d20| 61 74 69 6f 6e 2e 0a 4f | 70 74 69 6f 6e 61 6c 20 |ation..O|ptional |
|00002d30| 74 68 69 72 64 20 61 72 | 67 20 4f 56 45 52 57 52 |third ar|g OVERWR|
|00002d40| 49 54 45 20 6d 65 61 6e | 73 20 72 65 70 6c 61 63 |ITE mean|s replac|
|00002d50| 65 20 61 6e 79 20 65 78 | 69 73 74 69 6e 67 20 62 |e any ex|isting b|
|00002d60| 6f 6f 6b 6d 61 72 6b 73 | 20 77 69 74 68 0a 74 68 |ookmarks| with.th|
|00002d70| 69 73 20 6e 61 6d 65 2e | 0a 4f 70 74 69 6f 6e 61 |is name.|.Optiona|
|00002d80| 6c 20 66 6f 75 72 74 68 | 20 61 72 67 20 49 4e 46 |l fourth| arg INF|
|00002d90| 4f 2d 4e 4f 44 45 20 6d | 65 61 6e 73 20 74 68 69 |O-NODE m|eans thi|
|00002da0| 73 20 62 6f 6f 6b 6d 61 | 72 6b 20 69 73 20 61 74 |s bookma|rk is at|
|00002db0| 20 69 6e 66 6f 20 6e 6f | 64 65 0a 49 4e 46 4f 2d | info no|de.INFO-|
|00002dc0| 4e 4f 44 45 2c 20 73 6f | 20 72 65 63 6f 72 64 20 |NODE, so| record |
|00002dd0| 74 68 69 73 20 66 61 63 | 74 20 69 6e 20 74 68 65 |this fac|t in the|
|00002de0| 20 62 6f 6f 6b 6d 61 72 | 6b 27 73 20 65 6e 74 72 | bookmar|k's entr|
|00002df0| 79 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 62 |y...(def|alias 'b|
|00002e00| 6f 6f 6b 6d 61 72 6b 2d | 6d 61 6b 65 20 23 5b 28 |ookmark-|make #[(|
|00002e10| 6e 61 6d 65 20 26 6f 70 | 74 69 6f 6e 61 6c 20 61 |name &op|tional a|
|00002e20| 6e 6e 6f 74 61 74 69 6f | 6e 20 6f 76 65 72 77 72 |nnotatio|n overwr|
|00002e30| 69 74 65 20 69 6e 66 6f | 2d 6e 6f 64 65 29 20 22 |ite info|-node) "|
|00002e40| c0 20 88 c1 5c 6e 21 1b | 0c ac 88 c5 c6 0b 47 c7 |. ..\n!.|......G.|
|00002e50| 0b 24 88 c8 0b 21 ab 92 | 0e 09 ac 8e c8 0b 21 ca |.$...!..|......!.|
|00002e60| 0e 0b 0e 0c 5c 22 43 a1 | 88 aa 8d 0b ca 0e 0b 0e |....\"C.|........|
|00002e70| 0c 5c 22 44 0e 0d 42 16 | 0d 0b 16 0e 0e 0f 54 16 |.\"D..B.|......T.|
|00002e80| 0f d0 20 ad 82 d1 20 29 | 87 22 20 5b 62 6f 6f 6b |.. ... )|." [book|
|00002e90| 6d 61 72 6b 2d 6d 61 79 | 62 65 2d 6c 6f 61 64 2d |mark-may|be-load-|
|00002ea0| 64 65 66 61 75 6c 74 2d | 66 69 6c 65 20 63 6f 70 |default-|file cop|
|00002eb0| 79 2d 73 65 71 75 65 6e | 63 65 20 6e 61 6d 65 20 |y-sequen|ce name |
|00002ec0| 73 74 72 69 70 70 65 64 | 2d 6e 61 6d 65 20 62 6f |stripped|-name bo|
|00002ed0| 6f 6b 6d 61 72 6b 2d 78 | 65 6d 61 63 73 70 20 73 |okmark-x|emacsp s|
|00002ee0| 65 74 2d 74 65 78 74 2d | 70 72 6f 70 65 72 74 69 |et-text-|properti|
|00002ef0| 65 73 20 30 20 6e 69 6c | 20 62 6f 6f 6b 6d 61 72 |es 0 nil| bookmar|
|00002f00| 6b 2d 67 65 74 2d 62 6f | 6f 6b 6d 61 72 6b 20 6f |k-get-bo|okmark o|
|00002f10| 76 65 72 77 72 69 74 65 | 20 62 6f 6f 6b 6d 61 72 |verwrite| bookmar|
|00002f20| 6b 2d 6d 61 6b 65 2d 63 | 65 6c 6c 20 61 6e 6e 6f |k-make-c|ell anno|
|00002f30| 74 61 74 69 6f 6e 20 69 | 6e 66 6f 2d 6e 6f 64 65 |tation i|nfo-node|
|00002f40| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 61 6c 69 73 74 20 | bookmar|k-alist |
|00002f50| 62 6f 6f 6b 6d 61 72 6b | 2d 63 75 72 72 65 6e 74 |bookmark|-current|
|00002f60| 2d 62 6f 6f 6b 6d 61 72 | 6b 20 62 6f 6f 6b 6d 61 |-bookmar|k bookma|
|00002f70| 72 6b 2d 61 6c 69 73 74 | 2d 6d 6f 64 69 66 69 63 |rk-alist|-modific|
|00002f80| 61 74 69 6f 6e 2d 63 6f | 75 6e 74 20 62 6f 6f 6b |ation-co|unt book|
|00002f90| 6d 61 72 6b 2d 74 69 6d | 65 2d 74 6f 2d 73 61 76 |mark-tim|e-to-sav|
|00002fa0| 65 2d 70 20 62 6f 6f 6b | 6d 61 72 6b 2d 73 61 76 |e-p book|mark-sav|
|00002fb0| 65 5d 20 35 20 28 23 24 | 20 2e 20 31 31 34 37 36 |e] 5 (#$| . 11476|
|00002fc0| 29 5d 29 0a 23 40 32 39 | 33 20 52 65 74 75 72 6e |)]).#@29|3 Return|
|00002fd0| 20 74 68 65 20 72 65 63 | 6f 72 64 20 70 61 72 74 | the rec|ord part|
|00002fe0| 20 6f 66 20 61 20 6e 65 | 77 20 62 6f 6f 6b 6d 61 | of a ne|w bookma|
|00002ff0| 72 6b 2c 20 67 69 76 65 | 6e 20 41 4e 4e 4f 54 41 |rk, give|n ANNOTA|
|00003000| 54 49 4f 4e 2e 0a 4d 75 | 73 74 20 62 65 20 61 74 |TION..Mu|st be at|
|00003010| 20 74 68 65 20 63 6f 72 | 72 65 63 74 20 70 6f 73 | the cor|rect pos|
|00003020| 69 74 69 6f 6e 20 69 6e | 20 74 68 65 20 62 75 66 |ition in| the buf|
|00003030| 66 65 72 20 69 6e 20 77 | 68 69 63 68 20 74 68 65 |fer in w|hich the|
|00003040| 20 62 6f 6f 6b 6d 61 72 | 6b 20 69 73 0a 62 65 69 | bookmar|k is.bei|
|00003050| 6e 67 20 73 65 74 2e 20 | 20 54 68 69 73 20 6d 69 |ng set. | This mi|
|00003060| 67 68 74 20 63 68 61 6e | 67 65 20 73 6f 6d 65 64 |ght chan|ge somed|
|00003070| 61 79 2e 0a 4f 70 74 69 | 6f 6e 61 6c 20 73 65 63 |ay..Opti|onal sec|
|00003080| 6f 6e 64 20 61 72 67 20 | 49 4e 46 4f 2d 4e 4f 44 |ond arg |INFO-NOD|
|00003090| 45 20 6d 65 61 6e 73 20 | 74 68 69 73 20 62 6f 6f |E means |this boo|
|000030a0| 6b 6d 61 72 6b 20 69 73 | 20 61 74 20 69 6e 66 6f |kmark is| at info|
|000030b0| 20 6e 6f 64 65 0a 49 4e | 46 4f 2d 4e 4f 44 45 2c | node.IN|FO-NODE,|
|000030c0| 20 73 6f 20 72 65 63 6f | 72 64 20 74 68 69 73 20 | so reco|rd this |
|000030d0| 66 61 63 74 20 69 6e 20 | 74 68 65 20 62 6f 6f 6b |fact in |the book|
|000030e0| 6d 61 72 6b 27 73 20 65 | 6e 74 72 79 2e 1f 0a 28 |mark's e|ntry...(|
|000030f0| 64 65 66 61 6c 69 61 73 | 20 27 62 6f 6f 6b 6d 61 |defalias| 'bookma|
|00003100| 72 6b 2d 6d 61 6b 65 2d | 63 65 6c 6c 20 23 5b 28 |rk-make-|cell #[(|
|00003110| 61 6e 6e 6f 74 61 74 69 | 6f 6e 20 26 6f 70 74 69 |annotati|on &opti|
|00003120| 6f 6e 61 6c 20 69 6e 66 | 6f 2d 6e 6f 64 65 29 20 |onal inf|o-node) |
|00003130| 22 c0 c1 20 42 c2 64 60 | 5a 0b 59 ad 86 c4 60 60 |".. B.d`|Z.Y...``|
|00003140| 0b 5c 5c 5c 22 42 c5 60 | 65 5a 0b 59 ad 86 c4 60 |.\\\"B.`|eZ.Y...`|
|00003150| 60 0b 5a 5c 22 42 c6 60 | 42 46 1e 07 0e 08 ab 89 |`.Z\"B.`|BF......|
|00003160| 0e 07 c8 0e 08 42 43 a4 | 88 0e 09 ab 89 0e 07 c9 |.....BC.|........|
|00003170| 0e 09 42 43 a4 88 0e 07 | 29 87 22 20 5b 66 69 6c |..BC....|)." [fil|
|00003180| 65 6e 61 6d 65 20 62 6f | 6f 6b 6d 61 72 6b 2d 62 |ename bo|okmark-b|
|00003190| 75 66 66 65 72 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |uffer-fi|le-name |
|000031a0| 66 72 6f 6e 74 2d 63 6f | 6e 74 65 78 74 2d 73 74 |front-co|ntext-st|
|000031b0| 72 69 6e 67 20 62 6f 6f | 6b 6d 61 72 6b 2d 73 65 |ring boo|kmark-se|
|000031c0| 61 72 63 68 2d 73 69 7a | 65 20 62 75 66 66 65 72 |arch-siz|e buffer|
|000031d0| 2d 73 75 62 73 74 72 69 | 6e 67 2d 6e 6f 2d 70 72 |-substri|ng-no-pr|
|000031e0| 6f 70 65 72 74 69 65 73 | 20 72 65 61 72 2d 63 6f |operties| rear-co|
|000031f0| 6e 74 65 78 74 2d 73 74 | 72 69 6e 67 20 70 6f 73 |ntext-st|ring pos|
|00003200| 69 74 69 6f 6e 20 74 68 | 65 2d 72 65 63 6f 72 64 |ition th|e-record|
|00003210| 20 61 6e 6e 6f 74 61 74 | 69 6f 6e 20 69 6e 66 6f | annotat|ion info|
|00003220| 2d 6e 6f 64 65 5d 20 37 | 20 28 23 24 20 2e 20 31 |-node] 7| (#$ . 1|
|00003230| 32 32 33 34 29 5d 29 0a | 23 40 39 37 20 54 68 65 |2234)]).|#@97 The|
|00003240| 20 63 75 72 72 65 6e 74 | 20 76 65 72 73 69 6f 6e | current| version|
|00003250| 20 6f 66 20 74 68 65 20 | 66 6f 72 6d 61 74 20 75 | of the |format u|
|00003260| 73 65 64 20 62 79 20 62 | 6f 6f 6b 6d 61 72 6b 20 |sed by b|ookmark |
|00003270| 66 69 6c 65 73 2e 0a 59 | 6f 75 20 73 68 6f 75 6c |files..Y|ou shoul|
|00003280| 64 20 6e 65 76 65 72 20 | 6e 65 65 64 20 74 6f 20 |d never |need to |
|00003290| 63 68 61 6e 67 65 20 74 | 68 69 73 2e 1f 0a 28 64 |change t|his...(d|
|000032a0| 65 66 63 6f 6e 73 74 20 | 62 6f 6f 6b 6d 61 72 6b |efconst |bookmark|
|000032b0| 2d 66 69 6c 65 2d 66 6f | 72 6d 61 74 2d 76 65 72 |-file-fo|rmat-ver|
|000032c0| 73 69 6f 6e 20 31 20 28 | 23 24 20 2e 20 31 32 38 |sion 1 (|#$ . 128|
|000032d0| 36 31 29 29 0a 23 40 36 | 38 20 54 68 69 73 20 73 |61)).#@6|8 This s|
|000032e0| 74 72 69 6e 67 20 6d 61 | 72 6b 73 20 74 68 65 20 |tring ma|rks the |
|000032f0| 65 6e 64 20 6f 66 20 74 | 68 65 20 76 65 72 73 69 |end of t|he versi|
|00003300| 6f 6e 20 73 74 61 6d 70 | 20 69 6e 20 61 20 62 6f |on stamp| in a bo|
|00003310| 6f 6b 6d 61 72 6b 20 66 | 69 6c 65 2e 1f 0a 28 64 |okmark f|ile...(d|
|00003320| 65 66 63 6f 6e 73 74 20 | 62 6f 6f 6b 6d 61 72 6b |efconst |bookmark|
|00003330| 2d 65 6e 64 2d 6f 66 2d | 76 65 72 73 69 6f 6e 2d |-end-of-|version-|
|00003340| 73 74 61 6d 70 2d 6d 61 | 72 6b 65 72 20 22 2d 2a |stamp-ma|rker "-*|
|00003350| 2d 20 45 6e 64 20 4f 66 | 20 42 6f 6f 6b 6d 61 72 |- End Of| Bookmar|
|00003360| 6b 20 46 69 6c 65 20 46 | 6f 72 6d 61 74 20 56 65 |k File F|ormat Ve|
|00003370| 72 73 69 6f 6e 20 53 74 | 61 6d 70 20 2d 2a 2d 5c |rsion St|amp -*-\|
|00003380| 6e 22 20 28 23 24 20 2e | 20 31 33 30 31 38 29 29 |n" (#$ .| 13018))|
|00003390| 0a 23 40 32 30 39 20 52 | 65 74 75 72 6e 20 61 20 |.#@209 R|eturn a |
|000033a0| 62 6f 6f 6b 6d 61 72 6b | 2d 61 6c 69 73 74 20 28 |bookmark|-alist (|
|000033b0| 69 6e 20 61 6e 79 20 66 | 6f 72 6d 61 74 29 20 66 |in any f|ormat) f|
|000033c0| 72 6f 6d 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |rom the |current |
|000033d0| 62 75 66 66 65 72 2e 0a | 54 68 65 20 62 75 66 66 |buffer..|The buff|
|000033e0| 65 72 20 6d 75 73 74 20 | 6f 66 20 63 6f 75 72 73 |er must |of cours|
|000033f0| 65 20 63 6f 6e 74 61 69 | 6e 20 62 6f 6f 6b 6d 61 |e contai|n bookma|
|00003400| 72 6b 20 66 6f 72 6d 61 | 74 20 69 6e 66 6f 72 6d |rk forma|t inform|
|00003410| 61 74 69 6f 6e 2e 0a 44 | 6f 65 73 20 6e 6f 74 20 |ation..D|oes not |
|00003420| 63 61 72 65 20 66 72 6f | 6d 20 77 68 65 72 65 20 |care fro|m where |
|00003430| 69 6e 20 74 68 65 20 62 | 75 66 66 65 72 20 69 74 |in the b|uffer it|
|00003440| 20 69 73 20 63 61 6c 6c | 65 64 2c 20 61 6e 64 20 | is call|ed, and |
|00003450| 64 6f 65 73 20 6e 6f 74 | 0a 61 66 66 65 63 74 20 |does not|.affect |
|00003460| 70 6f 69 6e 74 2e 1f 0a | 28 64 65 66 61 6c 69 61 |point...|(defalia|
|00003470| 73 20 27 62 6f 6f 6b 6d | 61 72 6b 2d 61 6c 69 73 |s 'bookm|ark-alis|
|00003480| 74 2d 66 72 6f 6d 2d 62 | 75 66 66 65 72 20 23 5b |t-from-b|uffer #[|
|00003490| 6e 69 6c 20 22 8a 65 62 | 88 c0 09 c2 c3 23 ab 85 |nil ".eb|.....#..|
|000034a0| c4 70 21 aa 92 c0 c5 c2 | c3 23 ab 88 c6 75 88 c4 |.p!.....|.#...u..|
|000034b0| 70 21 aa 83 c7 c8 21 29 | 87 22 20 5b 73 65 61 72 |p!....!)|." [sear|
|000034c0| 63 68 2d 66 6f 72 77 61 | 72 64 20 62 6f 6f 6b 6d |ch-forwa|rd bookm|
|000034d0| 61 72 6b 2d 65 6e 64 2d | 6f 66 2d 76 65 72 73 69 |ark-end-|of-versi|
|000034e0| 6f 6e 2d 73 74 61 6d 70 | 2d 6d 61 72 6b 65 72 20 |on-stamp|-marker |
|000034f0| 6e 69 6c 20 74 20 72 65 | 61 64 20 22 28 22 20 2d |nil t re|ad "(" -|
|00003500| 31 20 65 72 72 6f 72 20 | 22 4e 6f 74 20 62 6f 6f |1 error |"Not boo|
|00003510| 6b 6d 61 72 6b 20 66 6f | 72 6d 61 74 22 5d 20 34 |kmark fo|rmat"] 4|
|00003520| 20 28 23 24 20 2e 20 31 | 33 32 30 37 29 5d 29 0a | (#$ . 1|3207)]).|
|00003530| 23 40 36 30 20 55 70 67 | 72 61 64 65 20 61 20 76 |#@60 Upg|rade a v|
|00003540| 65 72 73 69 6f 6e 20 30 | 20 61 6c 69 73 74 20 4f |ersion 0| alist O|
|00003550| 4c 44 2d 4c 49 53 54 20 | 74 6f 20 74 68 65 20 63 |LD-LIST |to the c|
|00003560| 75 72 72 65 6e 74 20 76 | 65 72 73 69 6f 6e 2e 1f |urrent v|ersion..|
|00003570| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00003580| 6d 61 72 6b 2d 75 70 67 | 72 61 64 65 2d 76 65 72 |mark-upg|rade-ver|
|00003590| 73 69 6f 6e 2d 30 2d 61 | 6c 69 73 74 20 23 5b 28 |sion-0-a|list #[(|
|000035a0| 6f 6c 64 2d 6c 69 73 74 | 29 20 22 c0 c1 5c 6e 5c |old-list|) "..\n\|
|000035b0| 22 87 22 20 5b 6d 61 70 | 63 61 72 20 23 5b 28 62 |"." [map|car #[(b|
|000035c0| 6f 6f 6b 6d 61 72 6b 29 | 20 22 08 40 19 08 41 40 |ookmark)| ".@..A@|
|000035d0| 89 1a 40 1b 5c 6e 41 40 | 1c c5 5c 6e 38 1e 06 c7 |..@.\nA@|..\n8...|
|000035e0| 5c 6e 38 1e 08 c9 5c 6e | 38 1e 5c 6e 09 c3 0b 42 |\n8...\n|8.\n...B|
|000035f0| cb 0c ae 81 cc 42 cd 0e | 06 ae 81 cc 42 c8 0e 08 |.....B..|....B...|
|00003600| 42 ce 0e 5c 6e 42 af 05 | 2e 07 44 87 22 20 5b 62 |B..\nB..|..D." [b|
|00003610| 6f 6f 6b 6d 61 72 6b 20 | 6e 61 6d 65 20 72 65 63 |ookmark |name rec|
|00003620| 6f 72 64 20 66 69 6c 65 | 6e 61 6d 65 20 66 72 6f |ord file|name fro|
|00003630| 6e 74 2d 73 74 72 20 32 | 20 72 65 61 72 2d 73 74 |nt-str 2| rear-st|
|00003640| 72 20 33 20 70 6f 73 69 | 74 69 6f 6e 20 34 20 61 |r 3 posi|tion 4 a|
|00003650| 6e 6e 20 66 72 6f 6e 74 | 2d 63 6f 6e 74 65 78 74 |nn front|-context|
|00003660| 2d 73 74 72 69 6e 67 20 | 22 22 20 72 65 61 72 2d |-string |"" rear-|
|00003670| 63 6f 6e 74 65 78 74 2d | 73 74 72 69 6e 67 20 61 |context-|string a|
|00003680| 6e 6e 6f 74 61 74 69 6f | 6e 5d 20 38 5d 20 6f 6c |nnotatio|n] 8] ol|
|00003690| 64 2d 6c 69 73 74 5d 20 | 33 20 28 23 24 20 2e 20 |d-list] |3 (#$ . |
|000036a0| 31 33 36 32 31 29 5d 29 | 0a 23 40 31 33 33 20 55 |13621)])|.#@133 U|
|000036b0| 70 67 72 61 64 65 20 61 | 20 62 6f 6f 6b 6d 61 72 |pgrade a| bookmar|
|000036c0| 6b 20 66 69 6c 65 20 6f | 66 20 66 6f 72 6d 61 74 |k file o|f format|
|000036d0| 20 30 20 28 74 68 65 20 | 6f 72 69 67 69 6e 61 6c | 0 (the |original|
|000036e0| 20 66 6f 72 6d 61 74 29 | 20 74 6f 20 66 6f 72 6d | format)| to form|
|000036f0| 61 74 20 31 2e 0a 54 68 | 69 73 20 65 78 70 65 63 |at 1..Th|is expec|
|00003700| 74 73 20 74 6f 20 62 65 | 20 63 61 6c 6c 65 64 20 |ts to be| called |
|00003710| 66 72 6f 6d 20 70 6f 69 | 6e 74 2d 6d 69 6e 20 69 |from poi|nt-min i|
|00003720| 6e 20 61 20 62 6f 6f 6b | 6d 61 72 6b 20 66 69 6c |n a book|mark fil|
|00003730| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 62 |e...(def|alias 'b|
|00003740| 6f 6f 6b 6d 61 72 6b 2d | 75 70 67 72 61 64 65 2d |ookmark-|upgrade-|
|00003750| 66 69 6c 65 2d 66 6f 72 | 6d 61 74 2d 66 72 6f 6d |file-for|mat-from|
|00003760| 2d 30 20 23 5b 6e 69 6c | 20 22 c0 c1 5c 6e 5c 22 |-0 #[nil| "..\n\"|
|00003770| 88 c3 20 1c c5 0c 21 1e | 06 65 64 7c 88 c7 20 88 |.. ...!.|.ed|.. .|
|00003780| c8 0e 06 70 5c 22 88 c9 | 20 88 2a 65 62 88 c0 ca |...p\"..| .*eb...|
|00003790| 5c 6e 5c 22 87 22 20 5b | 6d 65 73 73 61 67 65 20 |\n\"." [|message |
|000037a0| 22 55 70 67 72 61 64 69 | 6e 67 20 62 6f 6f 6b 6d |"Upgradi|ng bookm|
|000037b0| 61 72 6b 20 66 6f 72 6d | 61 74 20 66 72 6f 6d 20 |ark form|at from |
|000037c0| 30 20 74 6f 20 25 64 2e | 2e 2e 22 20 62 6f 6f 6b |0 to %d.|.." book|
|000037d0| 6d 61 72 6b 2d 66 69 6c | 65 2d 66 6f 72 6d 61 74 |mark-fil|e-format|
|000037e0| 2d 76 65 72 73 69 6f 6e | 20 62 6f 6f 6b 6d 61 72 |-version| bookmar|
|000037f0| 6b 2d 61 6c 69 73 74 2d | 66 72 6f 6d 2d 62 75 66 |k-alist-|from-buf|
|00003800| 66 65 72 20 6f 6c 64 2d | 6c 69 73 74 20 62 6f 6f |fer old-|list boo|
|00003810| 6b 6d 61 72 6b 2d 75 70 | 67 72 61 64 65 2d 76 65 |kmark-up|grade-ve|
|00003820| 72 73 69 6f 6e 2d 30 2d | 61 6c 69 73 74 20 6e 65 |rsion-0-|alist ne|
|00003830| 77 2d 6c 69 73 74 20 62 | 6f 6f 6b 6d 61 72 6b 2d |w-list b|ookmark-|
|00003840| 69 6e 73 65 72 74 2d 66 | 69 6c 65 2d 66 6f 72 6d |insert-f|ile-form|
|00003850| 61 74 2d 76 65 72 73 69 | 6f 6e 2d 73 74 61 6d 70 |at-versi|on-stamp|
|00003860| 20 70 70 20 73 61 76 65 | 2d 62 75 66 66 65 72 20 | pp save|-buffer |
|00003870| 22 55 70 67 72 61 64 69 | 6e 67 20 62 6f 6f 6b 6d |"Upgradi|ng bookm|
|00003880| 61 72 6b 20 66 6f 72 6d | 61 74 20 66 72 6f 6d 20 |ark form|at from |
|00003890| 30 20 74 6f 20 25 64 2e | 2e 2e 64 6f 6e 65 22 5d |0 to %d.|..done"]|
|000038a0| 20 33 20 28 23 24 20 2e | 20 31 33 39 39 39 29 5d | 3 (#$ .| 13999)]|
|000038b0| 29 0a 23 40 31 33 36 20 | 52 65 74 75 72 6e 20 61 |).#@136 |Return a|
|000038c0| 6e 20 69 6e 74 65 67 65 | 72 20 77 68 69 63 68 20 |n intege|r which |
|000038d0| 69 73 20 74 68 65 20 66 | 69 6c 65 2d 66 6f 72 6d |is the f|ile-form|
|000038e0| 61 74 20 76 65 72 73 69 | 6f 6e 20 6f 66 20 74 68 |at versi|on of th|
|000038f0| 69 73 20 62 6f 6f 6b 6d | 61 72 6b 20 66 69 6c 65 |is bookm|ark file|
|00003900| 2e 0a 54 68 69 73 20 65 | 78 70 65 63 74 73 20 74 |..This e|xpects t|
|00003910| 6f 20 62 65 20 63 61 6c | 6c 65 64 20 66 72 6f 6d |o be cal|led from|
|00003920| 20 70 6f 69 6e 74 2d 6d | 69 6e 20 69 6e 20 61 20 | point-m|in in a |
|00003930| 62 6f 6f 6b 6d 61 72 6b | 20 66 69 6c 65 2e 1f 0a |bookmark| file...|
|00003940| 28 64 65 66 61 6c 69 61 | 73 20 27 62 6f 6f 6b 6d |(defalia|s 'bookm|
|00003950| 61 72 6b 2d 67 72 6f 6b | 2d 66 69 6c 65 2d 66 6f |ark-grok|-file-fo|
|00003960| 72 6d 61 74 2d 76 65 72 | 73 69 6f 6e 20 23 5b 6e |rmat-ver|sion #[n|
|00003970| 69 6c 20 22 c0 c1 21 ab | 92 8a c2 20 1b c4 8e c5 |il "..!.|... ....|
|00003980| c6 21 88 c7 75 88 c8 70 | 21 2b 87 c9 87 22 20 5b |.!..u..p|!+..." [|
|00003990| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 22 5e 3b 3b 3b |looking-|at "^;;;|
|000039a0| 3b 22 20 6d 61 74 63 68 | 2d 64 61 74 61 20 6d 61 |;" match|-data ma|
|000039b0| 74 63 68 2d 64 61 74 61 | 20 28 28 73 74 6f 72 65 |tch-data| ((store|
|000039c0| 2d 6d 61 74 63 68 2d 64 | 61 74 61 20 6d 61 74 63 |-match-d|ata matc|
|000039d0| 68 2d 64 61 74 61 29 29 | 20 72 65 2d 73 65 61 72 |h-data))| re-sear|
|000039e0| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5b 30 2d 39 |ch-forwa|rd "[0-9|
|000039f0| 5d 22 20 2d 31 20 72 65 | 61 64 20 30 5d 20 32 20 |]" -1 re|ad 0] 2 |
|00003a00| 28 23 24 20 2e 20 31 34 | 35 32 30 29 5d 29 0a 23 |(#$ . 14|520)]).#|
|00003a10| 40 31 37 35 20 43 68 65 | 63 6b 20 74 68 65 20 66 |@175 Che|ck the f|
|00003a20| 69 6c 65 2d 66 6f 72 6d | 61 74 20 76 65 72 73 69 |ile-form|at versi|
|00003a30| 6f 6e 20 6f 66 20 74 68 | 69 73 20 62 6f 6f 6b 6d |on of th|is bookm|
|00003a40| 61 72 6b 20 66 69 6c 65 | 2e 0a 49 66 20 74 68 65 |ark file|..If the|
|00003a50| 20 76 65 72 73 69 6f 6e | 20 69 73 20 6e 6f 74 20 | version| is not |
|00003a60| 75 70 2d 74 6f 2d 64 61 | 74 65 2c 20 75 70 67 72 |up-to-da|te, upgr|
|00003a70| 61 64 65 20 69 74 20 61 | 75 74 6f 6d 61 74 69 63 |ade it a|utomatic|
|00003a80| 61 6c 6c 79 2e 0a 54 68 | 69 73 20 65 78 70 65 63 |ally..Th|is expec|
|00003a90| 74 73 20 74 6f 20 62 65 | 20 63 61 6c 6c 65 64 20 |ts to be| called |
|00003aa0| 66 72 6f 6d 20 70 6f 69 | 6e 74 2d 6d 69 6e 20 69 |from poi|nt-min i|
|00003ab0| 6e 20 61 20 62 6f 6f 6b | 6d 61 72 6b 20 66 69 6c |n a book|mark fil|
|00003ac0| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 62 |e...(def|alias 'b|
|00003ad0| 6f 6f 6b 6d 61 72 6b 2d | 6d 61 79 62 65 2d 75 70 |ookmark-|maybe-up|
|00003ae0| 67 72 61 64 65 2d 66 69 | 6c 65 2d 66 6f 72 6d 61 |grade-fi|le-forma|
|00003af0| 74 20 23 5b 6e 69 6c 20 | 22 c0 20 89 19 5c 6e 55 |t #[nil |". ..\nU|
|00003b00| ae 8c 09 c3 55 ab 84 c4 | 20 aa 83 c5 c6 21 29 87 |....U...| ....!).|
|00003b10| 22 20 5b 62 6f 6f 6b 6d | 61 72 6b 2d 67 72 6f 6b |" [bookm|ark-grok|
|00003b20| 2d 66 69 6c 65 2d 66 6f | 72 6d 61 74 2d 76 65 72 |-file-fo|rmat-ver|
|00003b30| 73 69 6f 6e 20 76 65 72 | 73 69 6f 6e 20 62 6f 6f |sion ver|sion boo|
|00003b40| 6b 6d 61 72 6b 2d 66 69 | 6c 65 2d 66 6f 72 6d 61 |kmark-fi|le-forma|
|00003b50| 74 2d 76 65 72 73 69 6f | 6e 20 30 20 62 6f 6f 6b |t-versio|n 0 book|
|00003b60| 6d 61 72 6b 2d 75 70 67 | 72 61 64 65 2d 66 69 6c |mark-upg|rade-fil|
|00003b70| 65 2d 66 6f 72 6d 61 74 | 2d 66 72 6f 6d 2d 30 20 |e-format|-from-0 |
|00003b80| 65 72 72 6f 72 20 22 42 | 6f 6f 6b 6d 61 72 6b 20 |error "B|ookmark |
|00003b90| 66 69 6c 65 20 66 6f 72 | 6d 61 74 20 76 65 72 73 |file for|mat vers|
|00003ba0| 69 6f 6e 20 73 74 72 61 | 6e 67 65 6e 65 73 73 22 |ion stra|ngeness"|
|00003bb0| 5d 20 33 20 28 23 24 20 | 2e 20 31 34 38 36 39 29 |] 3 (#$ |. 14869)|
|00003bc0| 5d 29 0a 23 40 36 35 20 | 49 6e 73 65 72 74 20 74 |]).#@65 |Insert t|
|00003bd0| 65 78 74 20 69 6e 64 69 | 63 61 74 69 6e 67 20 63 |ext indi|cating c|
|00003be0| 75 72 72 65 6e 74 20 76 | 65 72 73 69 6f 6e 20 6f |urrent v|ersion o|
|00003bf0| 66 20 62 6f 6f 6b 6d 61 | 72 6b 20 66 69 6c 65 20 |f bookma|rk file |
|00003c00| 66 6f 72 6d 61 74 2e 1f | 0a 28 64 65 66 61 6c 69 |format..|.(defali|
|00003c10| 61 73 20 27 62 6f 6f 6b | 6d 61 72 6b 2d 69 6e 73 |as 'book|mark-ins|
|00003c20| 65 72 74 2d 66 69 6c 65 | 2d 66 6f 72 6d 61 74 2d |ert-file|-format-|
|00003c30| 76 65 72 73 69 6f 6e 2d | 73 74 61 6d 70 20 23 5b |version-|stamp #[|
|00003c40| 6e 69 6c 20 22 c0 c1 5c | 6e 5c 22 63 88 c3 c4 c5 |nil "..\|n\"c....|
|00003c50| 0e 06 b1 04 87 22 20 5b | 66 6f 72 6d 61 74 20 22 |....." [|format "|
|00003c60| 3b 3b 3b 3b 20 45 6d 61 | 63 73 20 42 6f 6f 6b 6d |;;;; Ema|cs Bookm|
|00003c70| 61 72 6b 20 46 6f 72 6d | 61 74 20 56 65 72 73 69 |ark Form|at Versi|
|00003c80| 6f 6e 20 25 64 20 3b 3b | 3b 3b 5c 6e 22 20 62 6f |on %d ;;|;;\n" bo|
|00003c90| 6f 6b 6d 61 72 6b 2d 66 | 69 6c 65 2d 66 6f 72 6d |okmark-f|ile-form|
|00003ca0| 61 74 2d 76 65 72 73 69 | 6f 6e 20 22 3b 3b 3b 20 |at-versi|on ";;; |
|00003cb0| 54 68 69 73 20 66 6f 72 | 6d 61 74 20 69 73 20 6d |This for|mat is m|
|00003cc0| 65 61 6e 74 20 74 6f 20 | 62 65 20 73 6c 69 67 68 |eant to |be sligh|
|00003cd0| 74 6c 79 20 68 75 6d 61 | 6e 2d 72 65 61 64 61 62 |tly huma|n-readab|
|00003ce0| 6c 65 3b 5c 6e 22 20 22 | 3b 3b 3b 20 6e 65 76 65 |le;\n" "|;;; neve|
|00003cf0| 72 74 68 65 6c 65 73 73 | 2c 20 79 6f 75 20 70 72 |rtheless|, you pr|
|00003d00| 6f 62 61 62 6c 79 20 64 | 6f 6e 27 74 20 77 61 6e |obably d|on't wan|
|00003d10| 74 20 74 6f 20 65 64 69 | 74 20 69 74 2e 5c 6e 22 |t to edi|t it.\n"|
|00003d20| 20 22 3b 3b 3b 20 22 20 | 62 6f 6f 6b 6d 61 72 6b | ";;; " |bookmark|
|00003d30| 2d 65 6e 64 2d 6f 66 2d | 76 65 72 73 69 6f 6e 2d |-end-of-|version-|
|00003d40| 73 74 61 6d 70 2d 6d 61 | 72 6b 65 72 5d 20 34 20 |stamp-ma|rker] 4 |
|00003d50| 28 23 24 20 2e 20 31 35 | 33 30 34 29 5d 29 0a 23 |(#$ . 15|304)]).#|
|00003d60| 40 31 30 30 39 20 53 65 | 74 20 61 20 62 6f 6f 6b |@1009 Se|t a book|
|00003d70| 6d 61 72 6b 20 6e 61 6d | 65 64 20 4e 41 4d 45 20 |mark nam|ed NAME |
|00003d80| 69 6e 73 69 64 65 20 61 | 20 66 69 6c 65 2e 0a 49 |inside a| file..I|
|00003d90| 66 20 6e 61 6d 65 20 69 | 73 20 6e 69 6c 2c 20 74 |f name i|s nil, t|
|00003da0| 68 65 6e 20 74 68 65 20 | 75 73 65 72 20 77 69 6c |hen the |user wil|
|00003db0| 6c 20 62 65 20 70 72 6f | 6d 70 74 65 64 2e 0a 57 |l be pro|mpted..W|
|00003dc0| 69 74 68 20 70 72 65 66 | 69 78 20 61 72 67 2c 20 |ith pref|ix arg, |
|00003dd0| 77 69 6c 6c 20 6e 6f 74 | 20 6f 76 65 72 77 72 69 |will not| overwri|
|00003de0| 74 65 20 61 20 62 6f 6f | 6b 6d 61 72 6b 20 74 68 |te a boo|kmark th|
|00003df0| 61 74 20 68 61 73 20 74 | 68 65 20 73 61 6d 65 20 |at has t|he same |
|00003e00| 6e 61 6d 65 0a 61 73 20 | 4e 41 4d 45 20 69 66 20 |name.as |NAME if |
|00003e10| 73 75 63 68 20 61 20 62 | 6f 6f 6b 6d 61 72 6b 20 |such a b|ookmark |
|00003e20| 61 6c 72 65 61 64 79 20 | 65 78 69 73 74 73 2c 20 |already |exists, |
|00003e30| 62 75 74 20 69 6e 73 74 | 65 61 64 20 77 69 6c 6c |but inst|ead will|
|00003e40| 20 22 70 75 73 68 22 0a | 74 68 65 20 6e 65 77 20 | "push".|the new |
|00003e50| 62 6f 6f 6b 6d 61 72 6b | 20 6f 6e 74 6f 20 74 68 |bookmark| onto th|
|00003e60| 65 20 62 6f 6f 6b 6d 61 | 72 6b 20 61 6c 69 73 74 |e bookma|rk alist|
|00003e70| 2e 20 20 54 68 75 73 20 | 74 68 65 20 6d 6f 73 74 |. Thus |the most|
|00003e80| 20 72 65 63 65 6e 74 6c | 79 20 73 65 74 0a 62 6f | recentl|y set.bo|
|00003e90| 6f 6b 6d 61 72 6b 20 77 | 69 74 68 20 6e 61 6d 65 |okmark w|ith name|
|00003ea0| 20 4e 41 4d 45 20 77 6f | 75 6c 64 20 62 65 20 74 | NAME wo|uld be t|
|00003eb0| 68 65 20 6f 6e 65 20 69 | 6e 20 65 66 66 65 63 74 |he one i|n effect|
|00003ec0| 20 61 74 20 61 6e 79 20 | 67 69 76 65 6e 20 74 69 | at any |given ti|
|00003ed0| 6d 65 2c 0a 62 75 74 20 | 74 68 65 20 6f 74 68 65 |me,.but |the othe|
|00003ee0| 72 73 20 61 72 65 20 73 | 74 69 6c 6c 20 74 68 65 |rs are s|till the|
|00003ef0| 72 65 2c 20 73 68 6f 75 | 6c 64 20 79 6f 75 20 64 |re, shou|ld you d|
|00003f00| 65 63 69 64 65 20 74 6f | 20 64 65 6c 65 74 65 20 |ecide to| delete |
|00003f10| 74 68 65 20 6d 6f 73 74 | 0a 72 65 63 65 6e 74 20 |the most|.recent |
|00003f20| 6f 6e 65 2e 0a 0a 54 6f | 20 79 61 6e 6b 20 77 6f |one...To| yank wo|
|00003f30| 72 64 73 20 66 72 6f 6d | 20 74 68 65 20 74 65 78 |rds from| the tex|
|00003f40| 74 20 6f 66 20 74 68 65 | 20 62 75 66 66 65 72 20 |t of the| buffer |
|00003f50| 61 6e 64 20 75 73 65 20 | 74 68 65 6d 20 61 73 20 |and use |them as |
|00003f60| 70 61 72 74 20 6f 66 20 | 74 68 65 0a 62 6f 6f 6b |part of |the.book|
|00003f70| 6d 61 72 6b 20 6e 61 6d | 65 2c 20 74 79 70 65 20 |mark nam|e, type |
|00003f80| 43 2d 77 20 77 68 69 6c | 65 20 73 65 74 74 69 6e |C-w whil|e settin|
|00003f90| 67 20 61 20 62 6f 6f 6b | 6d 61 72 6b 2e 20 20 53 |g a book|mark. S|
|00003fa0| 75 63 63 65 73 73 69 76 | 65 20 43 2d 77 27 73 0a |uccessiv|e C-w's.|
|00003fb0| 79 61 6e 6b 20 73 75 63 | 63 65 73 73 69 76 65 20 |yank suc|cessive |
|00003fc0| 77 6f 72 64 73 2e 0a 0a | 54 79 70 69 6e 67 20 43 |words...|Typing C|
|00003fd0| 2d 75 20 69 6e 73 65 72 | 74 73 20 74 68 65 20 6e |-u inser|ts the n|
|00003fe0| 61 6d 65 20 6f 66 20 74 | 68 65 20 6c 61 73 74 20 |ame of t|he last |
|00003ff0| 62 6f 6f 6b 6d 61 72 6b | 20 75 73 65 64 20 69 6e |bookmark| used in|
|00004000| 20 74 68 65 20 62 75 66 | 66 65 72 0a 28 61 73 20 | the buf|fer.(as |
|00004010| 61 6e 20 61 69 64 20 69 | 6e 20 75 73 69 6e 67 20 |an aid i|n using |
|00004020| 61 20 73 69 6e 67 6c 65 | 20 62 6f 6f 6b 6d 61 72 |a single| bookmar|
|00004030| 6b 20 6e 61 6d 65 20 74 | 6f 20 74 72 61 63 6b 20 |k name t|o track |
|00004040| 79 6f 75 72 20 70 72 6f | 67 72 65 73 73 0a 74 68 |your pro|gress.th|
|00004050| 72 6f 75 67 68 20 61 20 | 6c 61 72 67 65 20 66 69 |rough a |large fi|
|00004060| 6c 65 29 2e 20 20 49 66 | 20 6e 6f 20 62 6f 6f 6b |le). If| no book|
|00004070| 6d 61 72 6b 20 77 61 73 | 20 75 73 65 64 2c 20 74 |mark was| used, t|
|00004080| 68 65 6e 20 43 2d 75 20 | 69 6e 73 65 72 74 73 20 |hen C-u |inserts |
|00004090| 74 68 65 0a 6e 61 6d 65 | 20 6f 66 20 74 68 65 20 |the.name| of the |
|000040a0| 66 69 6c 65 20 62 65 69 | 6e 67 20 76 69 73 69 74 |file bei|ng visit|
|000040b0| 65 64 2e 0a 0a 55 73 65 | 20 5c 5b 62 6f 6f 6b 6d |ed...Use| \[bookm|
|000040c0| 61 72 6b 2d 64 65 6c 65 | 74 65 5d 20 74 6f 20 72 |ark-dele|te] to r|
|000040d0| 65 6d 6f 76 65 20 62 6f | 6f 6b 6d 61 72 6b 73 20 |emove bo|okmarks |
|000040e0| 28 79 6f 75 20 67 69 76 | 65 20 69 74 20 61 20 6e |(you giv|e it a n|
|000040f0| 61 6d 65 2c 0a 61 6e 64 | 20 69 74 20 72 65 6d 6f |ame,.and| it remo|
|00004100| 76 65 73 20 6f 6e 6c 79 | 20 74 68 65 20 66 69 72 |ves only| the fir|
|00004110| 73 74 20 69 6e 73 74 61 | 6e 63 65 20 6f 66 20 61 |st insta|nce of a|
|00004120| 20 62 6f 6f 6b 6d 61 72 | 6b 20 77 69 74 68 20 74 | bookmar|k with t|
|00004130| 68 61 74 20 6e 61 6d 65 | 20 66 72 6f 6d 0a 74 68 |hat name| from.th|
|00004140| 65 20 6c 69 73 74 20 6f | 66 20 62 6f 6f 6b 6d 61 |e list o|f bookma|
|00004150| 72 6b 73 2e 29 1f 0a 28 | 64 65 66 61 6c 69 61 73 |rks.)..(|defalias|
|00004160| 20 27 62 6f 6f 6b 6d 61 | 72 6b 2d 73 65 74 20 23 | 'bookma|rk-set #|
|00004170| 5b 28 26 6f 70 74 69 6f | 6e 61 6c 20 6e 61 6d 65 |[(&optio|nal name|
|00004180| 20 70 61 72 67 29 20 22 | c0 20 ac 84 c1 c2 21 88 | parg) "|. ....!.|
|00004190| c3 20 88 60 14 60 15 70 | 16 06 0e 07 ae 82 c8 20 |. .`.`.p|....... |
|000041a0| 1e 09 0e 5c 6e ae 9f cb | cc cd 0e 09 5c 22 ce cf |...\n...|....\"..|
|000041b0| 0e 10 21 1e 11 d2 0e 11 | d3 d4 23 88 d2 0e 11 d5 |..!.....|..#.....|
|000041c0| d6 23 88 0e 11 29 23 1e | 17 ce 1e 18 0e 17 d9 98 |.#...)#.|........|
|000041d0| ab 84 0e 09 16 17 0e 1a | ab 88 db 0e 1c 0e 17 5c |........|.......\|
|000041e0| 22 aa 94 dd 0e 17 0e 18 | 0e 1c de 20 24 88 0e 17 |".......|... $...|
|000041f0| 16 07 df 20 88 0c 62 2b | 87 22 20 5b 62 6f 6f 6b |... ..b+|." [book|
|00004200| 6d 61 72 6b 2d 62 75 66 | 66 65 72 2d 66 69 6c 65 |mark-buf|fer-file|
|00004210| 2d 6e 61 6d 65 20 65 72 | 72 6f 72 20 22 42 75 66 |-name er|ror "Buf|
|00004220| 66 65 72 20 6e 6f 74 20 | 76 69 73 69 74 69 6e 67 |fer not |visiting|
|00004230| 20 61 20 66 69 6c 65 20 | 6f 72 20 64 69 72 65 63 | a file |or direc|
|00004240| 74 6f 72 79 22 20 62 6f | 6f 6b 6d 61 72 6b 2d 6d |tory" bo|okmark-m|
|00004250| 61 79 62 65 2d 6c 6f 61 | 64 2d 64 65 66 61 75 6c |aybe-loa|d-defaul|
|00004260| 74 2d 66 69 6c 65 20 62 | 6f 6f 6b 6d 61 72 6b 2d |t-file b|ookmark-|
|00004270| 63 75 72 72 65 6e 74 2d | 70 6f 69 6e 74 20 62 6f |current-|point bo|
|00004280| 6f 6b 6d 61 72 6b 2d 79 | 61 6e 6b 2d 70 6f 69 6e |okmark-y|ank-poin|
|00004290| 74 20 62 6f 6f 6b 6d 61 | 72 6b 2d 63 75 72 72 65 |t bookma|rk-curre|
|000042a0| 6e 74 2d 62 75 66 66 65 | 72 20 62 6f 6f 6b 6d 61 |nt-buffe|r bookma|
|000042b0| 72 6b 2d 63 75 72 72 65 | 6e 74 2d 62 6f 6f 6b 6d |rk-curre|nt-bookm|
|000042c0| 61 72 6b 20 62 6f 6f 6b | 6d 61 72 6b 2d 62 75 66 |ark book|mark-buf|
|000042d0| 66 65 72 2d 6e 61 6d 65 | 20 64 65 66 61 75 6c 74 |fer-name| default|
|000042e0| 20 6e 61 6d 65 20 72 65 | 61 64 2d 66 72 6f 6d 2d | name re|ad-from-|
|000042f0| 6d 69 6e 69 62 75 66 66 | 65 72 20 66 6f 72 6d 61 |minibuff|er forma|
|00004300| 74 20 22 53 65 74 20 62 | 6f 6f 6b 6d 61 72 6b 20 |t "Set b|ookmark |
|00004310| 28 25 73 29 3a 20 22 20 | 6e 69 6c 20 63 6f 70 79 |(%s): " |nil copy|
|00004320| 2d 6b 65 79 6d 61 70 20 | 6d 69 6e 69 62 75 66 66 |-keymap |minibuff|
|00004330| 65 72 2d 6c 6f 63 61 6c | 2d 6d 61 70 20 6e 6f 77 |er-local|-map now|
|00004340| 2d 6d 61 70 20 64 65 66 | 69 6e 65 2d 6b 65 79 20 |-map def|ine-key |
|00004350| 22 17 22 20 62 6f 6f 6b | 6d 61 72 6b 2d 79 61 6e |"." book|mark-yan|
|00004360| 6b 2d 77 6f 72 64 20 22 | 15 22 20 62 6f 6f 6b 6d |k-word "|." bookm|
|00004370| 61 72 6b 2d 69 6e 73 65 | 72 74 2d 63 75 72 72 65 |ark-inse|rt-curre|
|00004380| 6e 74 2d 62 6f 6f 6b 6d | 61 72 6b 20 73 74 72 20 |nt-bookm|ark str |
|00004390| 61 6e 6e 6f 74 61 74 69 | 6f 6e 20 22 22 20 62 6f |annotati|on "" bo|
|000043a0| 6f 6b 6d 61 72 6b 2d 75 | 73 65 2d 61 6e 6e 6f 74 |okmark-u|se-annot|
|000043b0| 61 74 69 6f 6e 73 20 62 | 6f 6f 6b 6d 61 72 6b 2d |ations b|ookmark-|
|000043c0| 72 65 61 64 2d 61 6e 6e | 6f 74 61 74 69 6f 6e 20 |read-ann|otation |
|000043d0| 70 61 72 67 20 62 6f 6f | 6b 6d 61 72 6b 2d 6d 61 |parg boo|kmark-ma|
|000043e0| 6b 65 20 62 6f 6f 6b 6d | 61 72 6b 2d 69 6e 66 6f |ke bookm|ark-info|
|000043f0| 2d 63 75 72 72 65 6e 74 | 2d 6e 6f 64 65 20 62 6f |-current|-node bo|
|00004400| 6f 6b 6d 61 72 6b 2d 62 | 6d 65 6e 75 2d 73 75 72 |okmark-b|menu-sur|
|00004410| 72 65 70 74 69 74 69 6f | 75 73 6c 79 2d 72 65 62 |reptitio|usly-reb|
|00004420| 75 69 6c 64 2d 6c 69 73 | 74 5d 20 37 20 28 23 24 |uild-lis|t] 7 (#$|
|00004430| 20 2e 20 31 35 37 31 38 | 29 20 28 6c 69 73 74 20 | . 15718|) (list |
|00004440| 6e 69 6c 20 63 75 72 72 | 65 6e 74 2d 70 72 65 66 |nil curr|ent-pref|
|00004450| 69 78 2d 61 72 67 29 5d | 29 0a 23 40 36 35 20 49 |ix-arg)]|).#@65 I|
|00004460| 66 20 69 6e 20 49 6e 66 | 6f 2d 6d 6f 64 65 2c 20 |f in Inf|o-mode, |
|00004470| 72 65 74 75 72 6e 20 63 | 75 72 72 65 6e 74 20 6e |return c|urrent n|
|00004480| 6f 64 65 20 6e 61 6d 65 | 20 28 61 20 73 74 72 69 |ode name| (a stri|
|00004490| 6e 67 29 2c 20 65 6c 73 | 65 20 6e 69 6c 2e 1f 0a |ng), els|e nil...|
|000044a0| 28 64 65 66 61 6c 69 61 | 73 20 27 62 6f 6f 6b 6d |(defalia|s 'bookm|
|000044b0| 61 72 6b 2d 69 6e 66 6f | 2d 63 75 72 72 65 6e 74 |ark-info|-current|
|000044c0| 2d 6e 6f 64 65 20 23 5b | 6e 69 6c 20 22 08 c1 61 |-node #[|nil "..a|
|000044d0| ad 81 5c 6e 87 22 20 5b | 6d 61 6a 6f 72 2d 6d 6f |..\n." [|major-mo|
|000044e0| 64 65 20 49 6e 66 6f 2d | 6d 6f 64 65 20 49 6e 66 |de Info-|mode Inf|
|000044f0| 6f 2d 63 75 72 72 65 6e | 74 2d 6e 6f 64 65 5d 20 |o-curren|t-node] |
|00004500| 32 20 28 23 24 20 2e 20 | 31 37 35 30 33 29 5d 29 |2 (#$ . |17503)])|
|00004510| 0a 23 40 31 32 38 20 4b | 69 6c 6c 20 66 72 6f 6d |.#@128 K|ill from|
|00004520| 20 70 6f 69 6e 74 20 74 | 6f 20 65 6e 64 20 6f 66 | point t|o end of|
|00004530| 20 6c 69 6e 65 2e 0a 49 | 66 20 6f 70 74 69 6f 6e | line..I|f option|
|00004540| 61 6c 20 61 72 67 20 4e | 45 57 4c 49 4e 45 2d 54 |al arg N|EWLINE-T|
|00004550| 4f 4f 20 69 73 20 6e 6f | 6e 2d 6e 69 6c 2c 20 64 |OO is no|n-nil, d|
|00004560| 65 6c 65 74 65 20 74 68 | 65 20 6e 65 77 6c 69 6e |elete th|e newlin|
|00004570| 65 20 74 6f 6f 2e 0a 44 | 6f 65 73 20 6e 6f 74 20 |e too..D|oes not |
|00004580| 61 66 66 65 63 74 20 74 | 68 65 20 6b 69 6c 6c 2d |affect t|he kill-|
|00004590| 72 69 6e 67 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ring...(|defalias|
|000045a0| 20 27 62 6f 6f 6b 6d 61 | 72 6b 2d 6b 69 6c 6c 2d | 'bookma|rk-kill-|
|000045b0| 6c 69 6e 65 20 23 5b 28 | 26 6f 70 74 69 6f 6e 61 |line #[(|&optiona|
|000045c0| 6c 20 6e 65 77 6c 69 6e | 65 2d 74 6f 6f 29 20 22 |l newlin|e-too) "|
|000045d0| 8a c0 7f 88 60 29 19 60 | 09 7c 88 5c 6e ad 88 c3 |....`).`|.|.\n...|
|000045e0| c4 21 ad 83 c5 c6 21 29 | 87 22 20 5b 6e 69 6c 20 |.!....!)|." [nil |
|000045f0| 65 6f 6c 20 6e 65 77 6c | 69 6e 65 2d 74 6f 6f 20 |eol newl|ine-too |
|00004600| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 22 5c 6e 22 20 |looking-|at "\n" |
|00004610| 64 65 6c 65 74 65 2d 63 | 68 61 72 20 31 5d 20 32 |delete-c|har 1] 2|
|00004620| 20 28 23 24 20 2e 20 31 | 37 36 38 37 29 5d 29 0a | (#$ . 1|7687)]).|
|00004630| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 21 ac |(byte-co|de "..!.|
|00004640| 82 c2 11 c1 0b 42 13 c0 | c4 21 ac 82 c2 14 c4 0b |.....B..|.!......|
|00004650| 42 13 c0 c5 21 ac 82 c2 | 15 c5 0b 42 13 c0 c6 21 |B...!...|...B...!|
|00004660| ac 83 c2 16 06 c6 0b 42 | 13 c0 c7 21 ac 83 c2 16 |.......B|...!....|
|00004670| 07 c7 0b 42 13 c2 87 22 | 20 5b 62 6f 75 6e 64 70 |...B..."| [boundp|
|00004680| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 61 6e 6e 6f 74 61 | bookmar|k-annota|
|00004690| 74 69 6f 6e 2d 70 61 72 | 61 67 72 61 70 68 20 6e |tion-par|agraph n|
|000046a0| 69 6c 20 63 75 72 72 65 | 6e 74 2d 6c 6f 61 64 2d |il curre|nt-load-|
|000046b0| 6c 69 73 74 20 62 6f 6f | 6b 6d 61 72 6b 2d 61 6e |list boo|kmark-an|
|000046c0| 6e 6f 74 61 74 69 6f 6e | 2d 6e 61 6d 65 20 62 6f |notation|-name bo|
|000046d0| 6f 6b 6d 61 72 6b 2d 61 | 6e 6e 6f 74 61 74 69 6f |okmark-a|nnotatio|
|000046e0| 6e 2d 62 75 66 66 65 72 | 20 62 6f 6f 6b 6d 61 72 |n-buffer| bookmar|
|000046f0| 6b 2d 61 6e 6e 6f 74 61 | 74 69 6f 6e 2d 66 69 6c |k-annota|tion-fil|
|00004700| 65 20 62 6f 6f 6b 6d 61 | 72 6b 2d 61 6e 6e 6f 74 |e bookma|rk-annot|
|00004710| 61 74 69 6f 6e 2d 70 6f | 69 6e 74 5d 20 32 29 0a |ation-po|int] 2).|
|00004720| 23 40 32 31 34 20 55 73 | 65 20 62 75 66 66 65 72 |#@214 Us|e buffer|
|00004730| 20 63 6f 6e 74 65 6e 74 | 73 20 61 73 20 74 68 65 | content|s as the|
|00004740| 20 61 6e 6e 6f 74 61 74 | 69 6f 6e 20 66 6f 72 20 | annotat|ion for |
|00004750| 61 20 62 6f 6f 6b 6d 61 | 72 6b 2e 0a 45 78 63 6c |a bookma|rk..Excl|
|00004760| 75 64 65 20 6c 69 6e 65 | 73 20 74 68 61 74 20 62 |ude line|s that b|
|00004770| 65 67 69 6e 20 77 69 74 | 68 20 60 23 27 2e 0a 53 |egin wit|h `#'..S|
|00004780| 74 6f 72 65 20 74 68 65 | 20 61 6e 6e 6f 74 61 74 |tore the| annotat|
|00004790| 69 6f 6e 20 74 65 78 74 | 20 69 6e 20 74 68 65 20 |ion text| in the |
|000047a0| 62 6f 6f 6b 6d 61 72 6b | 20 6c 69 73 74 20 77 69 |bookmark| list wi|
|000047b0| 74 68 0a 74 68 65 20 62 | 6f 6f 6b 6d 61 72 6b 20 |th.the b|ookmark |
|000047c0| 28 61 6e 64 20 66 69 6c | 65 2c 20 61 6e 64 20 70 |(and fil|e, and p|
|000047d0| 6f 69 6e 74 29 20 73 70 | 65 63 69 66 69 65 64 20 |oint) sp|ecified |
|000047e0| 69 6e 20 62 75 66 66 65 | 72 20 6c 6f 63 61 6c 20 |in buffe|r local |
|000047f0| 76 61 72 69 61 62 6c 65 | 73 2e 1f 0a 28 64 65 66 |variable|s...(def|
|00004800| 61 6c 69 61 73 20 27 62 | 6f 6f 6b 6d 61 72 6b 2d |alias 'b|ookmark-|
|00004810| 73 65 6e 64 2d 61 6e 6e | 6f 74 61 74 69 6f 6e 20 |send-ann|otation |
|00004820| 23 5b 6e 69 6c 20 22 08 | c1 61 ac 84 c2 c3 21 88 |#[nil ".|.a....!.|
|00004830| 65 62 88 60 64 57 ab 90 | c4 c5 21 ab 86 c6 c7 21 |eb.`dW..|..!....!|
|00004840| 88 aa 70 c8 79 88 aa 6b | 65 64 7b 0e 09 0e 5c 6e |..p.y..k|ed{...\n|
|00004850| 0e 0b 0e 0c 1e 0d 1e 0e | 1e 0f 1e 10 1e 11 8a d2 |........|........|
|00004860| 0e 0d 21 88 0e 0e 62 88 | d3 0e 0f 0e 11 0e 10 d4 |..!...b.|........|
|00004870| 20 24 88 0e 0f 16 15 29 | d6 20 88 0e 17 62 88 2d | $.....)|. ...b.-|
|00004880| d8 70 21 87 22 20 5b 6d | 61 6a 6f 72 2d 6d 6f 64 |.p!." [m|ajor-mod|
|00004890| 65 20 62 6f 6f 6b 6d 61 | 72 6b 2d 72 65 61 64 2d |e bookma|rk-read-|
|000048a0| 61 6e 6e 6f 74 61 74 69 | 6f 6e 2d 6d 6f 64 65 20 |annotati|on-mode |
|000048b0| 65 72 72 6f 72 20 22 4e | 6f 74 20 69 6e 20 62 6f |error "N|ot in bo|
|000048c0| 6f 6b 6d 61 72 6b 2d 72 | 65 61 64 2d 61 6e 6e 6f |okmark-r|ead-anno|
|000048d0| 74 61 74 69 6f 6e 2d 6d | 6f 64 65 22 20 6c 6f 6f |tation-m|ode" loo|
|000048e0| 6b 69 6e 67 2d 61 74 20 | 22 5e 23 22 20 62 6f 6f |king-at |"^#" boo|
|000048f0| 6b 6d 61 72 6b 2d 6b 69 | 6c 6c 2d 6c 69 6e 65 20 |kmark-ki|ll-line |
|00004900| 74 20 31 20 62 6f 6f 6b | 6d 61 72 6b 2d 61 6e 6e |t 1 book|mark-ann|
|00004910| 6f 74 61 74 69 6f 6e 2d | 70 61 72 61 67 72 61 70 |otation-|paragrap|
|00004920| 68 20 62 6f 6f 6b 6d 61 | 72 6b 2d 61 6e 6e 6f 74 |h bookma|rk-annot|
|00004930| 61 74 69 6f 6e 2d 6e 61 | 6d 65 20 62 6f 6f 6b 6d |ation-na|me bookm|
|00004940| 61 72 6b 2d 61 6e 6e 6f | 74 61 74 69 6f 6e 2d 70 |ark-anno|tation-p|
|00004950| 6f 69 6e 74 20 62 6f 6f | 6b 6d 61 72 6b 2d 61 6e |oint boo|kmark-an|
|00004960| 6e 6f 74 61 74 69 6f 6e | 2d 62 75 66 66 65 72 20 |notation|-buffer |
|00004970| 62 75 66 20 70 74 20 62 | 6f 6f 6b 6d 61 72 6b 20 |buf pt b|ookmark |
|00004980| 70 61 72 67 20 61 6e 6e | 6f 74 61 74 69 6f 6e 20 |parg ann|otation |
|00004990| 70 6f 70 2d 74 6f 2d 62 | 75 66 66 65 72 20 62 6f |pop-to-b|uffer bo|
|000049a0| 6f 6b 6d 61 72 6b 2d 6d | 61 6b 65 20 62 6f 6f 6b |okmark-m|ake book|
|000049b0| 6d 61 72 6b 2d 69 6e 66 | 6f 2d 63 75 72 72 65 6e |mark-inf|o-curren|
|000049c0| 74 2d 6e 6f 64 65 20 62 | 6f 6f 6b 6d 61 72 6b 2d |t-node b|ookmark-|
|000049d0| 63 75 72 72 65 6e 74 2d | 62 6f 6f 6b 6d 61 72 6b |current-|bookmark|
|000049e0| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 62 6d 65 6e 75 2d | bookmar|k-bmenu-|
|000049f0| 73 75 72 72 65 70 74 69 | 74 69 6f 75 73 6c 79 2d |surrepti|tiously-|
|00004a00| 72 65 62 75 69 6c 64 2d | 6c 69 73 74 20 62 6f 6f |rebuild-|list boo|
|00004a10| 6b 6d 61 72 6b 2d 63 75 | 72 72 65 6e 74 2d 70 6f |kmark-cu|rrent-po|
|00004a20| 69 6e 74 20 6b 69 6c 6c | 2d 62 75 66 66 65 72 5d |int kill|-buffer]|
|00004a30| 20 35 20 28 23 24 20 2e | 20 31 38 32 31 34 29 20 | 5 (#$ .| 18214) |
|00004a40| 6e 69 6c 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |nil]).(d|efalias |
|00004a50| 27 62 6f 6f 6b 6d 61 72 | 6b 2d 64 65 66 61 75 6c |'bookmar|k-defaul|
|00004a60| 74 2d 61 6e 6e 6f 74 61 | 74 69 6f 6e 2d 74 65 78 |t-annota|tion-tex|
|00004a70| 74 20 23 5b 28 62 6f 6f | 6b 6d 61 72 6b 29 20 22 |t #[(boo|kmark) "|
|00004a80| c0 09 c2 c3 c4 c5 c6 20 | c7 c8 20 c9 ca 20 cb cc |....... |.. .. ..|
|00004a90| cd 20 ce b0 0f 87 22 20 | 5b 22 23 20 20 54 79 70 |. ...." |["# Typ|
|00004aa0| 65 20 74 68 65 20 61 6e | 6e 6f 74 61 74 69 6f 6e |e the an|notation|
|00004ab0| 20 66 6f 72 20 62 6f 6f | 6b 6d 61 72 6b 20 27 22 | for boo|kmark '"|
|00004ac0| 20 62 6f 6f 6b 6d 61 72 | 6b 20 22 27 20 68 65 72 | bookmar|k "' her|
|00004ad0| 65 2e 5c 6e 22 20 22 23 | 20 20 41 6c 6c 20 6c 69 |e.\n" "#| All li|
|00004ae0| 6e 65 73 20 77 68 69 63 | 68 20 73 74 61 72 74 20 |nes whic|h start |
|00004af0| 77 69 74 68 20 61 20 27 | 23 27 20 77 69 6c 6c 20 |with a '|#' will |
|00004b00| 62 65 20 64 65 6c 65 74 | 65 64 2e 5c 6e 22 20 22 |be delet|ed.\n" "|
|00004b10| 23 20 20 54 79 70 65 20 | 43 2d 63 20 43 2d 63 20 |# Type |C-c C-c |
|00004b20| 77 68 65 6e 20 64 6f 6e | 65 2e 5c 6e 23 5c 6e 22 |when don|e.\n#\n"|
|00004b30| 20 22 23 20 20 41 75 74 | 68 6f 72 3a 20 22 20 75 | "# Aut|hor: " u|
|00004b40| 73 65 72 2d 66 75 6c 6c | 2d 6e 61 6d 65 20 22 20 |ser-full|-name " |
|00004b50| 3c 22 20 75 73 65 72 2d | 6c 6f 67 69 6e 2d 6e 61 |<" user-|login-na|
|00004b60| 6d 65 20 22 40 22 20 73 | 79 73 74 65 6d 2d 6e 61 |me "@" s|ystem-na|
|00004b70| 6d 65 20 22 3e 5c 6e 22 | 20 22 23 20 20 44 61 74 |me ">\n"| "# Dat|
|00004b80| 65 3a 20 20 20 20 22 20 | 63 75 72 72 65 6e 74 2d |e: " |current-|
|00004b90| 74 69 6d 65 2d 73 74 72 | 69 6e 67 20 22 5c 6e 22 |time-str|ing "\n"|
|00004ba0| 5d 20 31 35 5d 29 0a 23 | 40 31 32 36 20 46 75 6e |] 15]).#|@126 Fun|
|00004bb0| 63 74 69 6f 6e 20 74 6f | 20 72 65 74 75 72 6e 20 |ction to| return |
|00004bc0| 64 65 66 61 75 6c 74 20 | 74 65 78 74 20 74 6f 20 |default |text to |
|00004bd0| 75 73 65 20 66 6f 72 20 | 61 20 62 6f 6f 6b 6d 61 |use for |a bookma|
|00004be0| 72 6b 20 61 6e 6e 6f 74 | 61 74 69 6f 6e 2e 0a 49 |rk annot|ation..I|
|00004bf0| 74 20 74 61 6b 65 73 20 | 74 68 65 20 6e 61 6d 65 |t takes |the name|
|00004c00| 20 6f 66 20 74 68 65 20 | 62 6f 6f 6b 6d 61 72 6b | of the |bookmark|
|00004c10| 2c 20 61 73 20 61 20 73 | 74 72 69 6e 67 2c 20 61 |, as a s|tring, a|
|00004c20| 73 20 61 6e 20 61 72 67 | 2e 1f 0a 28 64 65 66 76 |s an arg|...(defv|
|00004c30| 61 72 20 62 6f 6f 6b 6d | 61 72 6b 2d 72 65 61 64 |ar bookm|ark-read|
|00004c40| 2d 61 6e 6e 6f 74 61 74 | 69 6f 6e 2d 74 65 78 74 |-annotat|ion-text|
|00004c50| 2d 66 75 6e 63 20 27 62 | 6f 6f 6b 6d 61 72 6b 2d |-func 'b|ookmark-|
|00004c60| 64 65 66 61 75 6c 74 2d | 61 6e 6e 6f 74 61 74 69 |default-|annotati|
|00004c70| 6f 6e 2d 74 65 78 74 20 | 28 23 24 20 2e 20 31 39 |on-text |(#$ . 19|
|00004c80| 33 37 33 29 29 0a 23 40 | 32 31 33 20 4d 6f 64 65 |373)).#@|213 Mode|
|00004c90| 20 66 6f 72 20 63 6f 6d | 70 6f 73 69 6e 67 20 61 | for com|posing a|
|00004ca0| 6e 6e 6f 74 61 74 69 6f | 6e 73 20 66 6f 72 20 61 |nnotatio|ns for a|
|00004cb0| 20 62 6f 6f 6b 6d 61 72 | 6b 2e 0a 57 61 6e 74 73 | bookmar|k..Wants|
|00004cc0| 20 42 55 46 20 50 4f 49 | 4e 54 20 50 41 52 47 20 | BUF POI|NT PARG |
|00004cd0| 61 6e 64 20 42 4f 4f 4b | 4d 41 52 4b 2e 0a 57 68 |and BOOK|MARK..Wh|
|00004ce0| 65 6e 20 79 6f 75 20 68 | 61 76 65 20 66 69 6e 69 |en you h|ave fini|
|00004cf0| 73 68 65 64 20 63 6f 6d | 70 6f 73 69 6e 67 2c 20 |shed com|posing, |
|00004d00| 74 79 70 65 20 5c 5b 62 | 6f 6f 6b 6d 61 72 6b 2d |type \[b|ookmark-|
|00004d10| 73 65 6e 64 2d 61 6e 6e | 6f 74 61 74 69 6f 6e 5d |send-ann|otation]|
|00004d20| 20 74 6f 20 73 65 6e 64 | 0a 74 68 65 20 61 6e 6e | to send|.the ann|
|00004d30| 6f 74 61 74 69 6f 6e 2e | 0a 0a 5c 7b 62 6f 6f 6b |otation.|..\{book|
|00004d40| 6d 61 72 6b 2d 72 65 61 | 64 2d 61 6e 6e 6f 74 61 |mark-rea|d-annota|
|00004d50| 74 69 6f 6e 2d 6d 6f 64 | 65 2d 6d 61 70 7d 0a 1f |tion-mod|e-map}..|
|00004d60| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00004d70| 6d 61 72 6b 2d 72 65 61 | 64 2d 61 6e 6e 6f 74 61 |mark-rea|d-annota|
|00004d80| 74 69 6f 6e 2d 6d 6f 64 | 65 20 23 5b 28 62 75 66 |tion-mod|e #[(buf|
|00004d90| 20 70 6f 69 6e 74 20 70 | 61 72 67 20 62 6f 6f 6b | point p|arg book|
|00004da0| 6d 61 72 6b 29 20 22 c0 | 20 88 c1 c2 21 88 c1 c3 |mark) ".| ...!...|
|00004db0| 21 88 c1 c4 21 88 c1 c5 | 21 88 c1 c6 21 88 0e 07 |!...!...|!...!...|
|00004dc0| 12 0e 08 13 0e 09 14 ca | 0e 09 21 15 0e 0b 16 06 |........|..!.....|
|00004dd0| cc 0e 0d 21 88 ce 16 0f | 0e 10 0e 08 21 63 88 d1 |...!....|....!c..|
|00004de0| d2 21 87 22 20 5b 6b 69 | 6c 6c 2d 61 6c 6c 2d 6c |.!." [ki|ll-all-l|
|00004df0| 6f 63 61 6c 2d 76 61 72 | 69 61 62 6c 65 73 20 6d |ocal-var|iables m|
|00004e00| 61 6b 65 2d 6c 6f 63 61 | 6c 2d 76 61 72 69 61 62 |ake-loca|l-variab|
|00004e10| 6c 65 20 62 6f 6f 6b 6d | 61 72 6b 2d 61 6e 6e 6f |le bookm|ark-anno|
|00004e20| 74 61 74 69 6f 6e 2d 70 | 61 72 61 67 72 61 70 68 |tation-p|aragraph|
|00004e30| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 61 6e 6e 6f 74 61 | bookmar|k-annota|
|00004e40| 74 69 6f 6e 2d 6e 61 6d | 65 20 62 6f 6f 6b 6d 61 |tion-nam|e bookma|
|00004e50| 72 6b 2d 61 6e 6e 6f 74 | 61 74 69 6f 6e 2d 62 75 |rk-annot|ation-bu|
|00004e60| 66 66 65 72 20 62 6f 6f | 6b 6d 61 72 6b 2d 61 6e |ffer boo|kmark-an|
|00004e70| 6e 6f 74 61 74 69 6f 6e | 2d 66 69 6c 65 20 62 6f |notation|-file bo|
|00004e80| 6f 6b 6d 61 72 6b 2d 61 | 6e 6e 6f 74 61 74 69 6f |okmark-a|nnotatio|
|00004e90| 6e 2d 70 6f 69 6e 74 20 | 70 61 72 67 20 62 6f 6f |n-point |parg boo|
|00004ea0| 6b 6d 61 72 6b 20 62 75 | 66 20 62 75 66 66 65 72 |kmark bu|f buffer|
|00004eb0| 2d 66 69 6c 65 2d 6e 61 | 6d 65 20 70 6f 69 6e 74 |-file-na|me point|
|00004ec0| 20 75 73 65 2d 6c 6f 63 | 61 6c 2d 6d 61 70 20 62 | use-loc|al-map b|
|00004ed0| 6f 6f 6b 6d 61 72 6b 2d | 72 65 61 64 2d 61 6e 6e |ookmark-|read-ann|
|00004ee0| 6f 74 61 74 69 6f 6e 2d | 6d 6f 64 65 2d 6d 61 70 |otation-|mode-map|
|00004ef0| 20 62 6f 6f 6b 6d 61 72 | 6b 2d 72 65 61 64 2d 61 | bookmar|k-read-a|
|00004f00| 6e 6e 6f 74 61 74 69 6f | 6e 2d 6d 6f 64 65 20 6d |nnotatio|n-mode m|
|00004f10| 61 6a 6f 72 2d 6d 6f 64 | 65 20 62 6f 6f 6b 6d 61 |ajor-mod|e bookma|
|00004f20| 72 6b 2d 72 65 61 64 2d | 61 6e 6e 6f 74 61 74 69 |rk-read-|annotati|
|00004f30| 6f 6e 2d 74 65 78 74 2d | 66 75 6e 63 20 72 75 6e |on-text-|func run|
|00004f40| 2d 68 6f 6f 6b 73 20 74 | 65 78 74 2d 6d 6f 64 65 |-hooks t|ext-mode|
|00004f50| 2d 68 6f 6f 6b 5d 20 32 | 20 28 23 24 20 2e 20 31 |-hook] 2| (#$ . 1|
|00004f60| 39 35 39 36 29 20 6e 69 | 6c 5d 29 0a 23 40 31 32 |9596) ni|l]).#@12|
|00004f70| 33 20 50 6f 70 20 75 70 | 20 61 20 62 75 66 66 65 |3 Pop up| a buffe|
|00004f80| 72 20 66 6f 72 20 65 6e | 74 65 72 69 6e 67 20 61 |r for en|tering a|
|00004f90| 20 62 6f 6f 6b 6d 61 72 | 6b 20 61 6e 6e 6f 74 61 | bookmar|k annota|
|00004fa0| 74 69 6f 6e 2e 0a 54 65 | 78 74 20 73 75 72 72 6f |tion..Te|xt surro|
|00004fb0| 75 6e 64 69 6e 67 20 74 | 68 65 20 62 6f 6f 6b 6d |unding t|he bookm|
|00004fc0| 61 72 6b 20 69 73 20 50 | 41 52 47 3b 20 74 68 65 |ark is P|ARG; the|
|00004fd0| 20 62 6f 6f 6b 6d 61 72 | 6b 20 6e 61 6d 65 20 69 | bookmar|k name i|
|00004fe0| 73 20 42 4f 4f 4b 4d 41 | 52 4b 2e 1f 0a 28 64 65 |s BOOKMA|RK...(de|
|00004ff0| 66 61 6c 69 61 73 20 27 | 62 6f 6f 6b 6d 61 72 6b |falias '|bookmark|
|00005000| 2d 72 65 61 64 2d 61 6e | 6e 6f 74 61 74 69 6f 6e |-read-an|notation|
|00005010| 20 23 5b 28 70 61 72 67 | 20 62 6f 6f 6b 6d 61 72 | #[(parg| bookmar|
|00005020| 6b 29 20 22 70 60 18 19 | c2 c3 c4 21 21 88 c5 09 |k) "p`..|...!!...|
|00005030| 08 0e 06 0e 07 24 2a 87 | 22 20 5b 70 6f 69 6e 74 |.....$*.|" [point|
|00005040| 20 62 75 66 20 70 6f 70 | 2d 74 6f 2d 62 75 66 66 | buf pop|-to-buff|
|00005050| 65 72 20 67 65 6e 65 72 | 61 74 65 2d 6e 65 77 2d |er gener|ate-new-|
|00005060| 62 75 66 66 65 72 2d 6e | 61 6d 65 20 22 2a 42 6f |buffer-n|ame "*Bo|
|00005070| 6f 6b 6d 61 72 6b 20 41 | 6e 6e 6f 74 61 74 69 6f |okmark A|nnotatio|
|00005080| 6e 20 43 6f 6d 70 6f 73 | 65 2a 22 20 62 6f 6f 6b |n Compos|e*" book|
|00005090| 6d 61 72 6b 2d 72 65 61 | 64 2d 61 6e 6e 6f 74 61 |mark-rea|d-annota|
|000050a0| 74 69 6f 6e 2d 6d 6f 64 | 65 20 70 61 72 67 20 62 |tion-mod|e parg b|
|000050b0| 6f 6f 6b 6d 61 72 6b 5d | 20 35 20 28 23 24 20 2e |ookmark]| 5 (#$ .|
|000050c0| 20 32 30 33 33 38 29 5d | 29 0a 23 40 34 39 20 4b | 20338)]|).#@49 K|
|000050d0| 65 79 6d 61 70 20 66 6f | 72 20 65 64 69 74 69 6e |eymap fo|r editin|
|000050e0| 67 20 61 6e 20 61 6e 6e | 6f 74 61 74 69 6f 6e 20 |g an ann|otation |
|000050f0| 6f 66 20 61 20 62 6f 6f | 6b 6d 61 72 6b 2e 1f 0a |of a boo|kmark...|
|00005100| 28 64 65 66 76 61 72 20 | 62 6f 6f 6b 6d 61 72 6b |(defvar |bookmark|
|00005110| 2d 65 64 69 74 2d 61 6e | 6e 6f 74 61 74 69 6f 6e |-edit-an|notation|
|00005120| 2d 6d 6f 64 65 2d 6d 61 | 70 20 28 63 6f 70 79 2d |-mode-ma|p (copy-|
|00005130| 6b 65 79 6d 61 70 20 74 | 65 78 74 2d 6d 6f 64 65 |keymap t|ext-mode|
|00005140| 2d 6d 61 70 29 20 28 23 | 24 20 2e 20 32 30 36 38 |-map) (#|$ . 2068|
|00005150| 37 29 29 0a 28 64 65 66 | 69 6e 65 2d 6b 65 79 20 |7)).(def|ine-key |
|00005160| 62 6f 6f 6b 6d 61 72 6b | 2d 65 64 69 74 2d 61 6e |bookmark|-edit-an|
|00005170| 6e 6f 74 61 74 69 6f 6e | 2d 6d 6f 64 65 2d 6d 61 |notation|-mode-ma|
|00005180| 70 20 22 03 03 22 20 27 | 62 6f 6f 6b 6d 61 72 6b |p ".." '|bookmark|
|00005190| 2d 73 65 6e 64 2d 65 64 | 69 74 65 64 2d 61 6e 6e |-send-ed|ited-ann|
|000051a0| 6f 74 61 74 69 6f 6e 29 | 0a 23 40 31 36 32 20 4d |otation)|.#@162 M|
|000051b0| 6f 64 65 20 66 6f 72 20 | 65 64 69 74 69 6e 67 20 |ode for |editing |
|000051c0| 74 68 65 20 61 6e 6e 6f | 74 61 74 69 6f 6e 20 6f |the anno|tation o|
|000051d0| 66 20 62 6f 6f 6b 6d 61 | 72 6b 20 42 4f 4f 4b 4d |f bookma|rk BOOKM|
|000051e0| 41 52 4b 2e 0a 57 68 65 | 6e 20 79 6f 75 20 68 61 |ARK..Whe|n you ha|
|000051f0| 76 65 20 66 69 6e 69 73 | 68 65 64 20 63 6f 6d 70 |ve finis|hed comp|
|00005200| 6f 73 69 6e 67 2c 20 74 | 79 70 65 20 5c 5b 62 6f |osing, t|ype \[bo|
|00005210| 6f 6b 6d 61 72 6b 2d 73 | 65 6e 64 2d 61 6e 6e 6f |okmark-s|end-anno|
|00005220| 74 61 74 69 6f 6e 5d 2e | 0a 0a 5c 7b 62 6f 6f 6b |tation].|..\{book|
|00005230| 6d 61 72 6b 2d 65 64 69 | 74 2d 61 6e 6e 6f 74 61 |mark-edi|t-annota|
|00005240| 74 69 6f 6e 2d 6d 6f 64 | 65 2d 6d 61 70 7d 0a 1f |tion-mod|e-map}..|
|00005250| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00005260| 6d 61 72 6b 2d 65 64 69 | 74 2d 61 6e 6e 6f 74 61 |mark-edi|t-annota|
|00005270| 74 69 6f 6e 2d 6d 6f 64 | 65 20 23 5b 28 62 6f 6f |tion-mod|e #[(boo|
|00005280| 6b 6d 61 72 6b 29 20 22 | c0 20 88 c1 c2 21 88 0b |kmark) "|. ...!..|
|00005290| 12 c4 0d 21 88 c6 16 07 | 0e 08 0b 21 63 88 c9 0b |...!....|...!c...|
|000052a0| 21 89 1e 5c 6e cb 61 ac | 8a 0e 5c 6e cc 98 ac 84 |!..\n.a.|..\n....|
|000052b0| 0e 5c 6e 63 88 29 cd ce | 21 87 22 20 5b 6b 69 6c |.\nc.)..|!." [kil|
|000052c0| 6c 2d 61 6c 6c 2d 6c 6f | 63 61 6c 2d 76 61 72 69 |l-all-lo|cal-vari|
|000052d0| 61 62 6c 65 73 20 6d 61 | 6b 65 2d 6c 6f 63 61 6c |ables ma|ke-local|
|000052e0| 2d 76 61 72 69 61 62 6c | 65 20 62 6f 6f 6b 6d 61 |-variabl|e bookma|
|000052f0| 72 6b 2d 61 6e 6e 6f 74 | 61 74 69 6f 6e 2d 6e 61 |rk-annot|ation-na|
|00005300| 6d 65 20 62 6f 6f 6b 6d | 61 72 6b 20 75 73 65 2d |me bookm|ark use-|
|00005310| 6c 6f 63 61 6c 2d 6d 61 | 70 20 62 6f 6f 6b 6d 61 |local-ma|p bookma|
|00005320| 72 6b 2d 65 64 69 74 2d | 61 6e 6e 6f 74 61 74 69 |rk-edit-|annotati|
|00005330| 6f 6e 2d 6d 6f 64 65 2d | 6d 61 70 20 62 6f 6f 6b |on-mode-|map book|
|00005340| 6d 61 72 6b 2d 65 64 69 | 74 2d 61 6e 6e 6f 74 61 |mark-edi|t-annota|
|00005350| 74 69 6f 6e 2d 6d 6f 64 | 65 20 6d 61 6a 6f 72 2d |tion-mod|e major-|
|00005360| 6d 6f 64 65 20 62 6f 6f | 6b 6d 61 72 6b 2d 72 65 |mode boo|kmark-re|
|00005370| 61 64 2d 61 6e 6e 6f 74 | 61 74 69 6f 6e 2d 74 65 |ad-annot|ation-te|
|00005380| 78 74 2d 66 75 6e 63 20 | 62 6f 6f 6b 6d 61 72 6b |xt-func |bookmark|
|00005390| 2d 67 65 74 2d 61 6e 6e | 6f 74 61 74 69 6f 6e 20 |-get-ann|otation |
|000053a0| 61 6e 6e 6f 74 61 74 69 | 6f 6e 20 6e 69 6c 20 22 |annotati|on nil "|
|000053b0| 22 20 72 75 6e 2d 68 6f | 6f 6b 73 20 74 65 78 74 |" run-ho|oks text|
|000053c0| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 33 20 28 23 |-mode-ho|ok] 3 (#|
|000053d0| 24 20 2e 20 32 30 39 31 | 31 29 20 6e 69 6c 5d 29 |$ . 2091|1) nil])|
|000053e0| 0a 23 40 37 37 20 55 73 | 65 20 62 75 66 66 65 72 |.#@77 Us|e buffer|
|000053f0| 20 63 6f 6e 74 65 6e 74 | 73 20 28 6d 69 6e 75 73 | content|s (minus|
|00005400| 20 62 65 67 69 6e 6e 69 | 6e 67 20 77 69 74 68 20 | beginni|ng with |
|00005410| 60 23 27 20 61 73 20 61 | 6e 6e 6f 74 61 74 69 6f |`#' as a|nnotatio|
|00005420| 6e 20 66 6f 72 20 61 20 | 62 6f 6f 6b 6d 61 72 6b |n for a |bookmark|
|00005430| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 62 6f |...(defa|lias 'bo|
|00005440| 6f 6b 6d 61 72 6b 2d 73 | 65 6e 64 2d 65 64 69 74 |okmark-s|end-edit|
|00005450| 65 64 2d 61 6e 6e 6f 74 | 61 74 69 6f 6e 20 23 5b |ed-annot|ation #[|
|00005460| 6e 69 6c 20 22 08 c1 61 | ac 84 c2 c3 21 88 65 62 |nil "..a|....!.eb|
|00005470| 88 60 64 57 ab 90 c4 c5 | 21 ab 86 c6 c7 21 88 aa |.`dW....|!....!..|
|00005480| 70 c8 79 88 aa 6b 65 64 | 7b 0e 09 1e 5c 6e 1e 0b |p.y..ked|{...\n..|
|00005490| cc 0e 5c 6e 0e 0b 5c 22 | 88 cd 20 88 0e 0e 62 88 |..\n..\"|.. ...b.|
|000054a0| 2a cf 70 21 87 22 20 5b | 6d 61 6a 6f 72 2d 6d 6f |*.p!." [|major-mo|
|000054b0| 64 65 20 62 6f 6f 6b 6d | 61 72 6b 2d 65 64 69 74 |de bookm|ark-edit|
|000054c0| 2d 61 6e 6e 6f 74 61 74 | 69 6f 6e 2d 6d 6f 64 65 |-annotat|ion-mode|
|000054d0| 20 65 72 72 6f 72 20 22 | 4e 6f 74 20 69 6e 20 62 | error "|Not in b|
|000054e0| 6f 6f 6b 6d 61 72 6b 2d | 65 64 69 74 2d 61 6e 6e |ookmark-|edit-ann|
|000054f0| 6f 74 61 74 69 6f 6e 2d | 6d 6f 64 65 22 20 6c 6f |otation-|mode" lo|
|00005500| 6f 6b 69 6e 67 2d 61 74 | 20 22 5e 23 22 20 62 6f |oking-at| "^#" bo|
|00005510| 6f 6b 6d 61 72 6b 2d 6b | 69 6c 6c 2d 6c 69 6e 65 |okmark-k|ill-line|
|00005520| 20 74 20 31 20 62 6f 6f | 6b 6d 61 72 6b 2d 61 6e | t 1 boo|kmark-an|
|00005530| 6e 6f 74 61 74 69 6f 6e | 2d 6e 61 6d 65 20 62 6f |notation|-name bo|
|00005540| 6f 6b 6d 61 72 6b 20 61 | 6e 6e 6f 74 61 74 69 6f |okmark a|nnotatio|
|00005550| 6e 20 62 6f 6f 6b 6d 61 | 72 6b 2d 73 65 74 2d 61 |n bookma|rk-set-a|
|00005560| 6e 6e 6f 74 61 74 69 6f | 6e 20 62 6f 6f 6b 6d 61 |nnotatio|n bookma|
|00005570| 72 6b 2d 62 6d 65 6e 75 | 2d 73 75 72 72 65 70 74 |rk-bmenu|-surrept|
|00005580| 69 74 69 6f 75 73 6c 79 | 2d 72 65 62 75 69 6c 64 |itiously|-rebuild|
|00005590| 2d 6c 69 73 74 20 62 6f | 6f 6b 6d 61 72 6b 2d 63 |-list bo|okmark-c|
|000055a0| 75 72 72 65 6e 74 2d 70 | 6f 69 6e 74 20 6b 69 6c |urrent-p|oint kil|
|000055b0| 6c 2d 62 75 66 66 65 72 | 5d 20 33 20 28 23 24 20 |l-buffer|] 3 (#$ |
|000055c0| 2e 20 32 31 34 37 38 29 | 20 6e 69 6c 5d 29 0a 23 |. 21478)| nil]).#|
|000055d0| 40 36 31 20 50 6f 70 20 | 75 70 20 61 20 62 75 66 |@61 Pop |up a buf|
|000055e0| 66 65 72 20 66 6f 72 20 | 65 64 69 74 69 6e 67 20 |fer for |editing |
|000055f0| 62 6f 6f 6b 6d 61 72 6b | 20 42 4f 4f 4b 4d 41 52 |bookmark| BOOKMAR|
|00005600| 4b 27 73 20 61 6e 6e 6f | 74 61 74 69 6f 6e 2e 1f |K's anno|tation..|
|00005610| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00005620| 6d 61 72 6b 2d 65 64 69 | 74 2d 61 6e 6e 6f 74 61 |mark-edi|t-annota|
|00005630| 74 69 6f 6e 20 23 5b 28 | 62 6f 6f 6b 6d 61 72 6b |tion #[(|bookmark|
|00005640| 29 20 22 70 60 18 19 c2 | c3 c4 21 21 88 c5 0e 06 |) "p`...|..!!....|
|00005650| 21 2a 87 22 20 5b 70 6f | 69 6e 74 20 62 75 66 20 |!*." [po|int buf |
|00005660| 70 6f 70 2d 74 6f 2d 62 | 75 66 66 65 72 20 67 65 |pop-to-b|uffer ge|
|00005670| 6e 65 72 61 74 65 2d 6e | 65 77 2d 62 75 66 66 65 |nerate-n|ew-buffe|
|00005680| 72 2d 6e 61 6d 65 20 22 | 2a 42 6f 6f 6b 6d 61 72 |r-name "|*Bookmar|
|00005690| 6b 20 41 6e 6e 6f 74 61 | 74 69 6f 6e 20 43 6f 6d |k Annota|tion Com|
|000056a0| 70 6f 73 65 2a 22 20 62 | 6f 6f 6b 6d 61 72 6b 2d |pose*" b|ookmark-|
|000056b0| 65 64 69 74 2d 61 6e 6e | 6f 74 61 74 69 6f 6e 2d |edit-ann|otation-|
|000056c0| 6d 6f 64 65 20 62 6f 6f | 6b 6d 61 72 6b 5d 20 33 |mode boo|kmark] 3|
|000056d0| 20 28 23 24 20 2e 20 32 | 31 39 37 32 29 5d 29 0a | (#$ . 2|1972)]).|
|000056e0| 23 40 39 32 20 49 6e 73 | 65 72 74 20 74 68 69 73 |#@92 Ins|ert this|
|000056f0| 20 62 75 66 66 65 72 27 | 73 20 76 61 6c 75 65 20 | buffer'|s value |
|00005700| 6f 66 20 62 6f 6f 6b 6d | 61 72 6b 2d 63 75 72 72 |of bookm|ark-curr|
|00005710| 65 6e 74 2d 62 6f 6f 6b | 6d 61 72 6b 2e 0a 44 65 |ent-book|mark..De|
|00005720| 66 61 75 6c 74 20 74 6f | 20 66 69 6c 65 20 6e 61 |fault to| file na|
|00005730| 6d 65 20 69 66 20 69 74 | 27 73 20 6e 69 6c 2e 1f |me if it|'s nil..|
|00005740| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00005750| 6d 61 72 6b 2d 69 6e 73 | 65 72 74 2d 63 75 72 72 |mark-ins|ert-curr|
|00005760| 65 6e 74 2d 62 6f 6f 6b | 6d 61 72 6b 20 23 5b 6e |ent-book|mark #[n|
|00005770| 69 6c 20 22 8a 08 71 88 | 09 29 89 1a ab 84 5c 6e |il "..q.|.)....\n|
|00005780| 63 aa 82 c3 20 29 87 22 | 20 5b 62 6f 6f 6b 6d 61 |c... )."| [bookma|
|00005790| 72 6b 2d 63 75 72 72 65 | 6e 74 2d 62 75 66 66 65 |rk-curre|nt-buffe|
|000057a0| 72 20 62 6f 6f 6b 6d 61 | 72 6b 2d 63 75 72 72 65 |r bookma|rk-curre|
|000057b0| 6e 74 2d 62 6f 6f 6b 6d | 61 72 6b 20 73 74 72 20 |nt-bookm|ark str |
|000057c0| 62 6f 6f 6b 6d 61 72 6b | 2d 69 6e 73 65 72 74 2d |bookmark|-insert-|
|000057d0| 62 75 66 66 65 72 2d 6e | 61 6d 65 5d 20 32 20 28 |buffer-n|ame] 2 (|
|000057e0| 23 24 20 2e 20 32 32 32 | 34 35 29 20 6e 69 6c 5d |#$ . 222|45) nil]|
|000057f0| 29 0a 23 40 31 31 33 20 | 49 6e 73 65 72 74 20 74 |).#@113 |Insert t|
|00005800| 68 65 20 63 75 72 72 65 | 6e 74 20 66 69 6c 65 20 |he curre|nt file |
|00005810| 6e 61 6d 65 20 69 6e 74 | 6f 20 74 68 65 20 62 6f |name int|o the bo|
|00005820| 6f 6b 6d 61 72 6b 20 6e | 61 6d 65 20 62 65 69 6e |okmark n|ame bein|
|00005830| 67 20 73 65 74 2e 0a 54 | 68 65 20 64 69 72 65 63 |g set..T|he direc|
|00005840| 74 6f 72 79 20 70 61 72 | 74 20 6f 66 20 74 68 65 |tory par|t of the|
|00005850| 20 66 69 6c 65 20 6e 61 | 6d 65 20 69 73 20 6e 6f | file na|me is no|
|00005860| 74 20 75 73 65 64 2e 1f | 0a 28 64 65 66 61 6c 69 |t used..|.(defali|
|00005870| 61 73 20 27 62 6f 6f 6b | 6d 61 72 6b 2d 69 6e 73 |as 'book|mark-ins|
|00005880| 65 72 74 2d 62 75 66 66 | 65 72 2d 6e 61 6d 65 20 |ert-buff|er-name |
|00005890| 23 5b 6e 69 6c 20 22 8a | 08 71 88 c1 20 29 89 1a |#[nil ".|.q.. )..|
|000058a0| 63 29 87 22 20 5b 62 6f | 6f 6b 6d 61 72 6b 2d 63 |c)." [bo|okmark-c|
|000058b0| 75 72 72 65 6e 74 2d 62 | 75 66 66 65 72 20 62 6f |urrent-b|uffer bo|
|000058c0| 6f 6b 6d 61 72 6b 2d 62 | 75 66 66 65 72 2d 6e 61 |okmark-b|uffer-na|
|000058d0| 6d 65 20 73 74 72 5d 20 | 32 20 28 23 24 20 2e 20 |me str] |2 (#$ . |
|000058e0| 32 32 35 32 30 29 20 6e | 69 6c 5d 29 0a 23 40 39 |22520) n|il]).#@9|
|000058f0| 36 20 52 65 74 75 72 6e | 20 74 68 65 20 6e 61 6d |6 Return| the nam|
|00005900| 65 20 6f 66 20 74 68 65 | 20 63 75 72 72 65 6e 74 |e of the| current|
|00005910| 20 62 75 66 66 65 72 27 | 73 20 66 69 6c 65 2c 20 | buffer'|s file, |
|00005920| 6e 6f 6e 2d 64 69 72 65 | 63 74 6f 72 79 2e 0a 49 |non-dire|ctory..I|
|00005930| 6e 20 49 6e 66 6f 2c 20 | 72 65 74 75 72 6e 20 74 |n Info, |return t|
|00005940| 68 65 20 63 75 72 72 65 | 6e 74 20 6e 6f 64 65 2e |he curre|nt node.|
|00005950| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 62 6f 6f |..(defal|ias 'boo|
|00005960| 6b 6d 61 72 6b 2d 62 75 | 66 66 65 72 2d 6e 61 6d |kmark-bu|ffer-nam|
|00005970| 65 20 23 5b 6e 69 6c 20 | 22 08 c1 98 ab 82 5c 6e |e #[nil |".....\n|
|00005980| 87 0b ab 84 c4 0b 21 87 | c5 c6 21 ab af 0e 06 ab |......!.|..!.....|
|00005990| ab 0e 06 3b ab 84 0e 06 | aa 83 0e 06 40 89 1e 07 |...;....|....@...|
|000059a0| 47 53 1e 08 0e 07 0e 08 | 48 c9 55 ab 8a c4 0e 07 |GS......|H.U.....|
|000059b0| ca 0e 08 4f 21 aa 83 cb | 70 21 2a 87 cb 70 21 87 |...O!...|p!*..p!.|
|000059c0| 22 20 5b 6d 6f 64 65 2d | 6e 61 6d 65 20 22 49 6e |" [mode-|name "In|
|000059d0| 66 6f 22 20 49 6e 66 6f | 2d 63 75 72 72 65 6e 74 |fo" Info|-current|
|000059e0| 2d 6e 6f 64 65 20 62 75 | 66 66 65 72 2d 66 69 6c |-node bu|ffer-fil|
|000059f0| 65 2d 6e 61 6d 65 20 66 | 69 6c 65 2d 6e 61 6d 65 |e-name f|ile-name|
|00005a00| 2d 6e 6f 6e 64 69 72 65 | 63 74 6f 72 79 20 62 6f |-nondire|ctory bo|
|00005a10| 75 6e 64 70 20 64 69 72 | 65 64 2d 64 69 72 65 63 |undp dir|ed-direc|
|00005a20| 74 6f 72 79 20 64 69 72 | 6e 61 6d 65 20 69 64 78 |tory dir|name idx|
|00005a30| 20 3f 5c 2f 20 30 20 62 | 75 66 66 65 72 2d 6e 61 | ?\/ 0 b|uffer-na|
|00005a40| 6d 65 5d 20 35 20 28 23 | 24 20 2e 20 32 32 37 37 |me] 5 (#|$ . 2277|
|00005a50| 30 29 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |0)]).(de|falias '|
|00005a60| 62 6f 6f 6b 6d 61 72 6b | 2d 79 61 6e 6b 2d 77 6f |bookmark|-yank-wo|
|00005a70| 72 64 20 23 5b 6e 69 6c | 20 22 8a 08 71 88 09 62 |rd #[nil| "..q..b|
|00005a80| 88 c2 60 8a c3 76 88 60 | 89 11 29 5c 22 29 89 1c |..`..v.`|..)\")..|
|00005a90| 63 29 87 22 20 5b 62 6f | 6f 6b 6d 61 72 6b 2d 63 |c)." [bo|okmark-c|
|00005aa0| 75 72 72 65 6e 74 2d 62 | 75 66 66 65 72 20 62 6f |urrent-b|uffer bo|
|00005ab0| 6f 6b 6d 61 72 6b 2d 79 | 61 6e 6b 2d 70 6f 69 6e |okmark-y|ank-poin|
|00005ac0| 74 20 62 75 66 66 65 72 | 2d 73 75 62 73 74 72 69 |t buffer|-substri|
|00005ad0| 6e 67 2d 6e 6f 2d 70 72 | 6f 70 65 72 74 69 65 73 |ng-no-pr|operties|
|00005ae0| 20 31 20 73 74 72 69 6e | 67 5d 20 35 20 6e 69 6c | 1 strin|g] 5 nil|
|00005af0| 20 6e 69 6c 5d 29 0a 23 | 40 31 33 33 20 52 65 74 | nil]).#|@133 Ret|
|00005b00| 75 72 6e 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |urn the |current |
|00005b10| 62 75 66 66 65 72 27 73 | 20 66 69 6c 65 20 69 6e |buffer's| file in|
|00005b20| 20 61 20 77 61 79 20 75 | 73 65 66 75 6c 20 66 6f | a way u|seful fo|
|00005b30| 72 20 62 6f 6f 6b 6d 61 | 72 6b 73 2e 0a 46 6f 72 |r bookma|rks..For|
|00005b40| 20 65 78 61 6d 70 6c 65 | 2c 20 69 66 20 74 68 69 | example|, if thi|
|00005b50| 73 20 69 73 20 61 20 49 | 6e 66 6f 20 62 75 66 66 |s is a I|nfo buff|
|00005b60| 65 72 2c 20 72 65 74 75 | 72 6e 20 74 68 65 20 49 |er, retu|rn the I|
|00005b70| 6e 66 6f 20 66 69 6c 65 | 27 73 20 6e 61 6d 65 2e |nfo file|'s name.|
|00005b80| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 62 6f 6f |..(defal|ias 'boo|
|00005b90| 6b 6d 61 72 6b 2d 62 75 | 66 66 65 72 2d 66 69 6c |kmark-bu|ffer-fil|
|00005ba0| 65 2d 6e 61 6d 65 20 23 | 5b 6e 69 6c 20 22 08 c1 |e-name #|[nil "..|
|00005bb0| 61 ab 82 5c 6e 87 0b ae | 90 c4 c5 21 ad 8b 0d ad |a..\n...|...!....|
|00005bc0| 88 0d 3b ab 82 0d 87 0d | 40 87 22 20 5b 6d 61 6a |..;.....|@." [maj|
|00005bd0| 6f 72 2d 6d 6f 64 65 20 | 49 6e 66 6f 2d 6d 6f 64 |or-mode |Info-mod|
|00005be0| 65 20 49 6e 66 6f 2d 63 | 75 72 72 65 6e 74 2d 66 |e Info-c|urrent-f|
|00005bf0| 69 6c 65 20 62 75 66 66 | 65 72 2d 66 69 6c 65 2d |ile buff|er-file-|
|00005c00| 6e 61 6d 65 20 62 6f 75 | 6e 64 70 20 64 69 72 65 |name bou|ndp dire|
|00005c10| 64 2d 64 69 72 65 63 74 | 6f 72 79 5d 20 32 20 28 |d-direct|ory] 2 (|
|00005c20| 23 24 20 2e 20 32 33 32 | 39 33 29 5d 29 0a 28 64 |#$ . 232|93)]).(d|
|00005c30| 65 66 61 6c 69 61 73 20 | 27 62 6f 6f 6b 6d 61 72 |efalias |'bookmar|
|00005c40| 6b 2d 6d 61 79 62 65 2d | 6c 6f 61 64 2d 64 65 66 |k-maybe-|load-def|
|00005c50| 61 75 6c 74 2d 66 69 6c | 65 20 23 5b 6e 69 6c 20 |ault-fil|e #[nil |
|00005c60| 22 08 3f ad ab 09 3f ad | a7 c2 c3 0c 21 21 ab 90 |".?...?.|....!!..|
|00005c70| c2 c3 0d 21 21 ac 89 c6 | c3 0c 21 c3 0d 21 5c 22 |...!!...|..!..!\"|
|00005c80| 88 c7 c3 0d 21 21 ad 89 | c8 0d c9 89 23 88 c9 89 |....!!..|....#...|
|00005c90| 10 87 22 20 5b 62 6f 6f | 6b 6d 61 72 6b 73 2d 61 |.." [boo|kmarks-a|
|00005ca0| 6c 72 65 61 64 79 2d 6c | 6f 61 64 65 64 20 62 6f |lready-l|oaded bo|
|00005cb0| 6f 6b 6d 61 72 6b 2d 61 | 6c 69 73 74 20 66 69 6c |okmark-a|list fil|
|00005cc0| 65 2d 65 78 69 73 74 73 | 2d 70 20 65 78 70 61 6e |e-exists|-p expan|
|00005cd0| 64 2d 66 69 6c 65 2d 6e | 61 6d 65 20 62 6f 6f 6b |d-file-n|ame book|
|00005ce0| 6d 61 72 6b 2d 6f 6c 64 | 2d 64 65 66 61 75 6c 74 |mark-old|-default|
|00005cf0| 2d 66 69 6c 65 20 62 6f | 6f 6b 6d 61 72 6b 2d 64 |-file bo|okmark-d|
|00005d00| 65 66 61 75 6c 74 2d 66 | 69 6c 65 20 72 65 6e 61 |efault-f|ile rena|
|00005d10| 6d 65 2d 66 69 6c 65 20 | 66 69 6c 65 2d 72 65 61 |me-file |file-rea|
|00005d20| 64 61 62 6c 65 2d 70 20 | 62 6f 6f 6b 6d 61 72 6b |dable-p |bookmark|
|00005d30| 2d 6c 6f 61 64 20 74 5d | 20 34 5d 29 0a 28 64 65 |-load t]| 4]).(de|
|00005d40| 66 61 6c 69 61 73 20 27 | 62 6f 6f 6b 6d 61 72 6b |falias '|bookmark|
|00005d50| 2d 6d 61 79 62 65 2d 73 | 6f 72 74 2d 61 6c 69 73 |-maybe-s|ort-alis|
|00005d60| 74 20 23 5b 6e 69 6c 20 | 22 08 ad 88 c1 c2 0b 21 |t #[nil |"......!|
|00005d70| c4 5c 22 89 13 87 22 20 | 5b 62 6f 6f 6b 6d 61 72 |.\"..." |[bookmar|
|00005d80| 6b 2d 73 6f 72 74 2d 66 | 6c 61 67 20 73 6f 72 74 |k-sort-f|lag sort|
|00005d90| 20 63 6f 70 79 2d 61 6c | 69 73 74 20 62 6f 6f 6b | copy-al|ist book|
|00005da0| 6d 61 72 6b 2d 61 6c 69 | 73 74 20 23 5b 28 78 20 |mark-ali|st #[(x |
|00005db0| 79 29 20 22 08 40 09 40 | 99 87 22 20 5b 78 20 79 |y) ".@.@|.." [x y|
|00005dc0| 5d 20 32 5d 5d 20 33 5d | 29 0a 23 40 35 31 36 20 |] 2]] 3]|).#@516 |
|00005dd0| 4a 75 6d 70 20 74 6f 20 | 62 6f 6f 6b 6d 61 72 6b |Jump to |bookmark|
|00005de0| 20 42 4f 4f 4b 4d 41 52 | 4b 20 28 61 20 70 6f 69 | BOOKMAR|K (a poi|
|00005df0| 6e 74 20 69 6e 20 73 6f | 6d 65 20 66 69 6c 65 29 |nt in so|me file)|
|00005e00| 2e 20 20 0a 59 6f 75 20 | 6d 61 79 20 68 61 76 65 |. .You |may have|
|00005e10| 20 61 20 70 72 6f 62 6c | 65 6d 20 75 73 69 6e 67 | a probl|em using|
|00005e20| 20 74 68 69 73 20 66 75 | 6e 63 74 69 6f 6e 20 69 | this fu|nction i|
|00005e30| 66 20 74 68 65 20 76 61 | 6c 75 65 20 6f 66 20 76 |f the va|lue of v|
|00005e40| 61 72 69 61 62 6c 65 0a | 60 62 6f 6f 6b 6d 61 72 |ariable.|`bookmar|
|00005e50| 6b 2d 61 6c 69 73 74 27 | 20 69 73 20 6e 69 6c 2e |k-alist'| is nil.|
|00005e60| 20 20 49 66 20 74 68 61 | 74 20 68 61 70 70 65 6e | If tha|t happen|
|00005e70| 73 2c 20 79 6f 75 20 6e | 65 65 64 20 74 6f 20 6c |s, you n|eed to l|
|00005e80| 6f 61 64 20 69 6e 20 73 | 6f 6d 65 0a 62 6f 6f 6b |oad in s|ome.book|
|00005e90| 6d 61 72 6b 73 2e 20 20 | 53 65 65 20 68 65 6c 70 |marks. |See help|
|00005ea0| 20 6f 6e 20 66 75 6e 63 | 74 69 6f 6e 20 60 62 6f | on func|tion `bo|
|00005eb0| 6f 6b 6d 61 72 6b 2d 6c | 6f 61 64 27 20 66 6f 72 |okmark-l|oad' for|
|00005ec0| 20 6d 6f 72 65 20 61 62 | 6f 75 74 0a 74 68 69 73 | more ab|out.this|
|00005ed0| 2e 0a 0a 49 66 20 74 68 | 65 20 66 69 6c 65 20 70 |...If th|e file p|
|00005ee0| 6f 69 6e 74 65 64 20 74 | 6f 20 62 79 20 42 4f 4f |ointed t|o by BOO|
|00005ef0| 4b 4d 41 52 4b 20 6e 6f | 20 6c 6f 6e 67 65 72 20 |KMARK no| longer |
|00005f00| 65 78 69 73 74 73 2c 20 | 79 6f 75 20 77 69 6c 6c |exists, |you will|
|00005f10| 20 62 65 20 61 73 6b 65 | 64 0a 69 66 20 79 6f 75 | be aske|d.if you|
|00005f20| 20 77 69 73 68 20 74 6f | 20 67 69 76 65 20 74 68 | wish to| give th|
|00005f30| 65 20 62 6f 6f 6b 6d 61 | 72 6b 20 61 20 6e 65 77 |e bookma|rk a new|
|00005f40| 20 6c 6f 63 61 74 69 6f | 6e 2c 20 61 6e 64 20 62 | locatio|n, and b|
|00005f50| 6f 6f 6b 6d 61 72 6b 2d | 6a 75 6d 70 0a 77 69 6c |ookmark-|jump.wil|
|00005f60| 6c 20 74 68 65 6e 20 6a | 75 6d 70 20 74 6f 20 74 |l then j|ump to t|
|00005f70| 68 65 20 6e 65 77 20 6c | 6f 63 61 74 69 6f 6e 2c |he new l|ocation,|
|00005f80| 20 61 73 20 77 65 6c 6c | 20 61 73 20 72 65 63 6f | as well| as reco|
|00005f90| 72 64 69 6e 67 20 69 74 | 20 69 6e 20 70 6c 61 63 |rding it| in plac|
|00005fa0| 65 0a 6f 66 20 74 68 65 | 20 6f 6c 64 20 6f 6e 65 |e.of the| old one|
|00005fb0| 20 69 6e 20 74 68 65 20 | 70 65 72 6d 61 6e 65 6e | in the |permanen|
|00005fc0| 74 20 62 6f 6f 6b 6d 61 | 72 6b 20 72 65 63 6f 72 |t bookma|rk recor|
|00005fd0| 64 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 62 |d...(def|alias 'b|
|00005fe0| 6f 6f 6b 6d 61 72 6b 2d | 6a 75 6d 70 20 23 5b 28 |ookmark-|jump #[(|
|00005ff0| 62 6f 6f 6b 6d 61 72 6b | 29 20 22 74 ac 84 08 09 |bookmark|) "t....|
|00006000| 42 11 c2 08 21 89 1b ad | 91 c4 0b 40 21 ad 8b 0b |B...!...|...@!...|
|00006010| 41 62 ad 86 0d ad 83 c6 | 08 21 29 87 22 20 5b 62 |Ab......|.!)." [b|
|00006020| 6f 6f 6b 6d 61 72 6b 20 | 62 6f 6f 6b 6d 61 72 6b |ookmark |bookmark|
|00006030| 2d 68 69 73 74 6f 72 79 | 20 62 6f 6f 6b 6d 61 72 |-history| bookmar|
|00006040| 6b 2d 6a 75 6d 70 2d 6e | 6f 73 65 6c 65 63 74 20 |k-jump-n|oselect |
|00006050| 63 65 6c 6c 20 73 77 69 | 74 63 68 2d 74 6f 2d 62 |cell swi|tch-to-b|
|00006060| 75 66 66 65 72 20 62 6f | 6f 6b 6d 61 72 6b 2d 61 |uffer bo|okmark-a|
|00006070| 75 74 6f 6d 61 74 69 63 | 61 6c 6c 79 2d 73 68 6f |utomatic|ally-sho|
|00006080| 77 2d 61 6e 6e 6f 74 61 | 74 69 6f 6e 73 20 62 6f |w-annota|tions bo|
|00006090| 6f 6b 6d 61 72 6b 2d 73 | 68 6f 77 2d 61 6e 6e 6f |okmark-s|how-anno|
|000060a0| 74 61 74 69 6f 6e 5d 20 | 33 20 28 23 24 20 2e 20 |tation] |3 (#$ . |
|000060b0| 32 34 30 31 36 29 20 28 | 62 6f 6f 6b 6d 61 72 6b |24016) (|bookmark|
|000060c0| 2d 63 6f 6d 70 6c 65 74 | 69 6e 67 2d 72 65 61 64 |-complet|ing-read|
|000060d0| 20 22 4a 75 6d 70 20 74 | 6f 20 62 6f 6f 6b 6d 61 | "Jump t|o bookma|
|000060e0| 72 6b 22 20 62 6f 6f 6b | 6d 61 72 6b 2d 63 75 72 |rk" book|mark-cur|
|000060f0| 72 65 6e 74 2d 62 6f 6f | 6b 6d 61 72 6b 29 5d 29 |rent-boo|kmark)])|
|00006100| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 62 6f 6f 6b |.(defali|as 'book|
|00006110| 6d 61 72 6b 2d 6a 75 6d | 70 2d 6e 6f 73 65 6c 65 |mark-jum|p-nosele|
|00006120| 63 74 20 23 5b 28 73 74 | 72 29 20 22 c0 20 88 c1 |ct #[(st|r) ". ..|
|00006130| c2 0b 21 21 1c c5 0b 21 | 1e 06 c7 0b 21 1e 08 c9 |..!!...!|....!...|
|00006140| 0b 21 1e 5c 6e cb 0b 21 | 1e 0c 0c 1e 0d ce 0c 21 |.!.\n..!|.......!|
|00006150| ac b2 0c cf 50 1e 10 ce | 0e 10 21 ad 82 0e 10 29 |....P...|..!....)|
|00006160| ae 9e 0c d1 50 1e 10 ce | 0e 10 21 ad 82 0e 10 29 |....P...|..!....)|
|00006170| ae 8e 0c d2 50 1e 10 ce | 0e 10 21 ad 82 0e 10 29 |....P...|..!....)|
|00006180| 89 14 ab c3 8a 0e 0c ab | 8c d3 d4 21 88 d5 0c 0e |........|...!....|
|00006190| 0c 5c 22 88 aa 89 d6 0c | 21 71 88 0e 5c 6e 62 88 |.\".....|!q..\nb.|
|000061a0| 0e 06 ab 8c d7 0e 06 64 | d8 23 ab 84 d9 94 62 88 |.......d|.#....b.|
|000061b0| 0e 08 ab 8c da 0e 08 65 | d8 23 ab 84 d9 95 62 88 |.......e|.#....b.|
|000061c0| 0b 16 1b 70 60 29 42 aa | 9e dc 20 88 dd de 0e 0d |...p`)B.|.. .....|
|000061d0| 21 df 0b e0 52 21 ab 89 | e1 0b 21 88 e2 0b 21 aa |!...R!..|..!...!.|
|000061e0| 86 e3 e4 0b 5c 22 88 e5 | 2e 06 87 22 20 5b 62 6f |....\"..|..." [bo|
|000061f0| 6f 6b 6d 61 72 6b 2d 6d | 61 79 62 65 2d 6c 6f 61 |okmark-m|aybe-loa|
|00006200| 64 2d 64 65 66 61 75 6c | 74 2d 66 69 6c 65 20 65 |d-defaul|t-file e|
|00006210| 78 70 61 6e 64 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |xpand-fi|le-name |
|00006220| 62 6f 6f 6b 6d 61 72 6b | 2d 67 65 74 2d 66 69 6c |bookmark|-get-fil|
|00006230| 65 6e 61 6d 65 20 73 74 | 72 20 66 69 6c 65 20 62 |ename st|r file b|
|00006240| 6f 6f 6b 6d 61 72 6b 2d | 67 65 74 2d 66 72 6f 6e |ookmark-|get-fron|
|00006250| 74 2d 63 6f 6e 74 65 78 | 74 2d 73 74 72 69 6e 67 |t-contex|t-string|
|00006260| 20 66 6f 72 77 61 72 64 | 2d 73 74 72 20 62 6f 6f | forward|-str boo|
|00006270| 6b 6d 61 72 6b 2d 67 65 | 74 2d 72 65 61 72 2d 63 |kmark-ge|t-rear-c|
|00006280| 6f 6e 74 65 78 74 2d 73 | 74 72 69 6e 67 20 62 65 |ontext-s|tring be|
|00006290| 68 69 6e 64 2d 73 74 72 | 20 62 6f 6f 6b 6d 61 72 |hind-str| bookmar|
|000062a0| 6b 2d 67 65 74 2d 70 6f | 73 69 74 69 6f 6e 20 70 |k-get-po|sition p|
|000062b0| 6c 61 63 65 20 62 6f 6f | 6b 6d 61 72 6b 2d 67 65 |lace boo|kmark-ge|
|000062c0| 74 2d 69 6e 66 6f 2d 6e | 6f 64 65 20 69 6e 66 6f |t-info-n|ode info|
|000062d0| 2d 6e 6f 64 65 20 6f 72 | 69 67 2d 66 69 6c 65 20 |-node or|ig-file |
|000062e0| 66 69 6c 65 2d 65 78 69 | 73 74 73 2d 70 20 22 2e |file-exi|sts-p ".|
|000062f0| 5a 22 20 61 6c 74 6e 61 | 6d 65 20 22 2e 67 7a 22 |Z" altna|me ".gz"|
|00006300| 20 22 2e 7a 22 20 72 65 | 71 75 69 72 65 20 69 6e | ".z" re|quire in|
|00006310| 66 6f 20 49 6e 66 6f 2d | 66 69 6e 64 2d 6e 6f 64 |fo Info-|find-nod|
|00006320| 65 20 66 69 6e 64 2d 66 | 69 6c 65 2d 6e 6f 73 65 |e find-f|ile-nose|
|00006330| 6c 65 63 74 20 73 65 61 | 72 63 68 2d 66 6f 72 77 |lect sea|rch-forw|
|00006340| 61 72 64 20 74 20 30 20 | 73 65 61 72 63 68 2d 62 |ard t 0 |search-b|
|00006350| 61 63 6b 77 61 72 64 20 | 62 6f 6f 6b 6d 61 72 6b |ackward |bookmark|
|00006360| 2d 63 75 72 72 65 6e 74 | 2d 62 6f 6f 6b 6d 61 72 |-current|-bookmar|
|00006370| 6b 20 64 69 6e 67 20 79 | 2d 6f 72 2d 6e 2d 70 20 |k ding y|-or-n-p |
|00006380| 66 69 6c 65 2d 6e 61 6d | 65 2d 6e 6f 6e 64 69 72 |file-nam|e-nondir|
|00006390| 65 63 74 6f 72 79 20 22 | 20 6e 6f 6e 65 78 69 73 |ectory "| nonexis|
|000063a0| 74 65 6e 74 2e 20 20 52 | 65 6c 6f 63 61 74 65 20 |tent. R|elocate |
|000063b0| 5c 22 22 20 22 5c 22 3f | 20 22 20 62 6f 6f 6b 6d |\"" "\"?| " bookm|
|000063c0| 61 72 6b 2d 72 65 6c 6f | 63 61 74 65 20 62 6f 6f |ark-relo|cate boo|
|000063d0| 6b 6d 61 72 6b 2d 6a 75 | 6d 70 2d 6e 6f 73 65 6c |kmark-ju|mp-nosel|
|000063e0| 65 63 74 20 6d 65 73 73 | 61 67 65 20 22 42 6f 6f |ect mess|age "Boo|
|000063f0| 6b 6d 61 72 6b 20 6e 6f | 74 20 72 65 6c 6f 63 61 |kmark no|t reloca|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
